/dports/news/husky-sqpack/husky-sqpack-1.9.20191207/progate/ |
H A D | mkglobt.pas | 62 procedure ParseAddr(AStr: String; Var DestAddr: AddrType); 253 procedure ParseAddr(AStr: String; Var DestAddr: AddrType); 258 AStr := StripBoth(AStr, ' '); 260 p := pos('@', AStr);
|
H A D | inifile.pas | 217 if Length (AStr) > Len then Exit; 218 while Length (AStr) < Len do AStr := AStr + Ch; 219 FillStr := AStr; 223 while (Length(AStr) - 1 >= 0) AND 224 (AStr [Length(AStr)] in [#32,#9]) DO 225 AStr[0] := chr(Length(AStr) - 1); 226 StrCut := AStr; 230 while (Length(AStr) - 1 >= 0) AND 231 (AStr [1] in [#32,#9]) DO 232 AStr := Copy (AStr,2,Length(AStr) - 1); [all …]
|
H A D | mkstring.pas | 15 Procedure MKStrCat(Var St: String; AStr: String); 734 Procedure MKStrCat(Var St: String; AStr: String); 739 i := Length(AStr); 742 Move(AStr[1], St[Length(St) + 1], i);
|
/dports/news/husky-sqpack/husky-sqpack-1.9.20191207/promknl/ |
H A D | mkglobt.pas | 62 procedure ParseAddr(AStr: String; Var DestAddr: AddrType); 253 procedure ParseAddr(AStr: String; Var DestAddr: AddrType); 258 AStr := StripBoth(AStr, ' '); 260 p := pos('@', AStr);
|
H A D | mkstring.pas | 15 Procedure MKStrCat(Var St: String; AStr: String); 734 Procedure MKStrCat(Var St: String; AStr: String); 739 i := Length(AStr); 742 Move(AStr[1], St[Length(St) + 1], i);
|
H A D | inifile2.pas | 213 if Length (AStr) > Len then Exit; 214 while Length (AStr) < Len do AStr := AStr + Ch; 215 FillStr := AStr; 219 while (Length(AStr) - 1 >= 0) AND 220 (AStr [Length(AStr)] in [#32,#9]) DO 221 AStr[0] := chr(Length(AStr) - 1); 222 StrCut := AStr; 226 while (Length(AStr) - 1 >= 0) AND 227 (AStr [1] in [#32,#9]) DO 228 AStr := Copy (AStr,2,Length(AStr) - 1); [all …]
|
/dports/news/husky-sqpack/husky-sqpack-1.9.20191207/protick/ |
H A D | mkglobt.pas | 64 procedure ParseAddr(AStr: String; Var DestAddr: AddrType); 255 procedure ParseAddr(AStr: String; Var DestAddr: AddrType); 260 AStr := StripBoth(AStr, ' '); 262 p := pos('@', AStr);
|
H A D | inifile.pas | 217 if Length (AStr) > Len then Exit; 218 while Length (AStr) < Len do AStr := AStr + Ch; 219 FillStr := AStr; 223 while (Length(AStr) - 1 >= 0) AND 224 (AStr [Length(AStr)] in [#32,#9]) DO 225 AStr[0] := chr(Length(AStr) - 1); 226 StrCut := AStr; 230 while (Length(AStr) - 1 >= 0) AND 231 (AStr [1] in [#32,#9]) DO 232 AStr := Copy (AStr,2,Length(AStr) - 1); [all …]
|
H A D | mkstring.pas | 18 Procedure MKStrCat(Var St: String; AStr: String); 737 Procedure MKStrCat(Var St: String; AStr: String); 742 i := Length(AStr); 745 Move(AStr[1], St[Length(St) + 1], i);
|
/dports/news/husky-fidoconf/husky-fidoconf-1.9.20191207/progate/ |
H A D | mkglobt.pas | 62 procedure ParseAddr(AStr: String; Var DestAddr: AddrType); 253 procedure ParseAddr(AStr: String; Var DestAddr: AddrType); 258 AStr := StripBoth(AStr, ' '); 260 p := pos('@', AStr);
|
H A D | inifile.pas | 217 if Length (AStr) > Len then Exit; 218 while Length (AStr) < Len do AStr := AStr + Ch; 219 FillStr := AStr; 223 while (Length(AStr) - 1 >= 0) AND 224 (AStr [Length(AStr)] in [#32,#9]) DO 225 AStr[0] := chr(Length(AStr) - 1); 226 StrCut := AStr; 230 while (Length(AStr) - 1 >= 0) AND 231 (AStr [1] in [#32,#9]) DO 232 AStr := Copy (AStr,2,Length(AStr) - 1); [all …]
|
H A D | mkstring.pas | 15 Procedure MKStrCat(Var St: String; AStr: String); 734 Procedure MKStrCat(Var St: String; AStr: String); 739 i := Length(AStr); 742 Move(AStr[1], St[Length(St) + 1], i);
|
/dports/news/husky-hpt/husky-hpt-1.9.20191207/progate/ |
H A D | mkglobt.pas | 62 procedure ParseAddr(AStr: String; Var DestAddr: AddrType); 253 procedure ParseAddr(AStr: String; Var DestAddr: AddrType); 258 AStr := StripBoth(AStr, ' '); 260 p := pos('@', AStr);
|
H A D | inifile.pas | 217 if Length (AStr) > Len then Exit; 218 while Length (AStr) < Len do AStr := AStr + Ch; 219 FillStr := AStr; 223 while (Length(AStr) - 1 >= 0) AND 224 (AStr [Length(AStr)] in [#32,#9]) DO 225 AStr[0] := chr(Length(AStr) - 1); 226 StrCut := AStr; 230 while (Length(AStr) - 1 >= 0) AND 231 (AStr [1] in [#32,#9]) DO 232 AStr := Copy (AStr,2,Length(AStr) - 1); [all …]
|
H A D | mkstring.pas | 15 Procedure MKStrCat(Var St: String; AStr: String); 734 Procedure MKStrCat(Var St: String; AStr: String); 739 i := Length(AStr); 742 Move(AStr[1], St[Length(St) + 1], i);
|
/dports/news/husky-fidoconf/husky-fidoconf-1.9.20191207/promknl/ |
H A D | mkstring.pas | 15 Procedure MKStrCat(Var St: String; AStr: String); 734 Procedure MKStrCat(Var St: String; AStr: String); 739 i := Length(AStr); 742 Move(AStr[1], St[Length(St) + 1], i);
|
H A D | mkglobt.pas | 62 procedure ParseAddr(AStr: String; Var DestAddr: AddrType); 253 procedure ParseAddr(AStr: String; Var DestAddr: AddrType); 258 AStr := StripBoth(AStr, ' '); 260 p := pos('@', AStr);
|
H A D | inifile2.pas | 213 if Length (AStr) > Len then Exit; 214 while Length (AStr) < Len do AStr := AStr + Ch; 215 FillStr := AStr; 219 while (Length(AStr) - 1 >= 0) AND 220 (AStr [Length(AStr)] in [#32,#9]) DO 221 AStr[0] := chr(Length(AStr) - 1); 222 StrCut := AStr; 226 while (Length(AStr) - 1 >= 0) AND 227 (AStr [1] in [#32,#9]) DO 228 AStr := Copy (AStr,2,Length(AStr) - 1); [all …]
|
/dports/news/husky-hpt/husky-hpt-1.9.20191207/promknl/ |
H A D | inifile2.pas | 213 if Length (AStr) > Len then Exit; 214 while Length (AStr) < Len do AStr := AStr + Ch; 215 FillStr := AStr; 219 while (Length(AStr) - 1 >= 0) AND 220 (AStr [Length(AStr)] in [#32,#9]) DO 221 AStr[0] := chr(Length(AStr) - 1); 222 StrCut := AStr; 226 while (Length(AStr) - 1 >= 0) AND 227 (AStr [1] in [#32,#9]) DO 228 AStr := Copy (AStr,2,Length(AStr) - 1); [all …]
|
H A D | mkglobt.pas | 62 procedure ParseAddr(AStr: String; Var DestAddr: AddrType); 253 procedure ParseAddr(AStr: String; Var DestAddr: AddrType); 258 AStr := StripBoth(AStr, ' '); 260 p := pos('@', AStr);
|
H A D | mkstring.pas | 15 Procedure MKStrCat(Var St: String; AStr: String); 734 Procedure MKStrCat(Var St: String; AStr: String); 739 i := Length(AStr); 742 Move(AStr[1], St[Length(St) + 1], i);
|
/dports/news/husky-fidoconf/husky-fidoconf-1.9.20191207/protick/ |
H A D | mkglobt.pas | 64 procedure ParseAddr(AStr: String; Var DestAddr: AddrType); 255 procedure ParseAddr(AStr: String; Var DestAddr: AddrType); 260 AStr := StripBoth(AStr, ' '); 262 p := pos('@', AStr);
|
H A D | mkstring.pas | 18 Procedure MKStrCat(Var St: String; AStr: String); 737 Procedure MKStrCat(Var St: String; AStr: String); 742 i := Length(AStr); 745 Move(AStr[1], St[Length(St) + 1], i);
|
H A D | inifile.pas | 217 if Length (AStr) > Len then Exit; 218 while Length (AStr) < Len do AStr := AStr + Ch; 219 FillStr := AStr; 223 while (Length(AStr) - 1 >= 0) AND 224 (AStr [Length(AStr)] in [#32,#9]) DO 225 AStr[0] := chr(Length(AStr) - 1); 226 StrCut := AStr; 230 while (Length(AStr) - 1 >= 0) AND 231 (AStr [1] in [#32,#9]) DO 232 AStr := Copy (AStr,2,Length(AStr) - 1); [all …]
|
/dports/news/husky-hpt/husky-hpt-1.9.20191207/protick/ |
H A D | mkglobt.pas | 64 procedure ParseAddr(AStr: String; Var DestAddr: AddrType); 255 procedure ParseAddr(AStr: String; Var DestAddr: AddrType); 260 AStr := StripBoth(AStr, ' '); 262 p := pos('@', AStr);
|