2 *********************************************************************
4 Copyright (C) 1997, 1998 Gertjan Schouten
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software
18 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
19 *********************************************************************
21 System Utilities For Free Pascal
24 { shared with strings unit }
25 function strlen(p : pchar) : longint;
26 function strcopy(dest,source : pchar) : pchar;
27 function strlcopy(dest,source : pchar;maxlen : longint) : pchar;
28 function strecopy(dest,source : pchar) : pchar;
29 function strend(p : pchar) : pchar;
30 function strcat(dest,source : pchar) : pchar;
31 function strcomp(str1,str2 : pchar) : longint;
32 function strlcomp(str1,str2 : pchar;l : longint) : longint;
33 function stricomp(str1,str2 : pchar) : longint;
34 function strmove(dest,source : pchar;l : longint) : pchar;
35 function strlcat(dest,source : pchar;l : longint) : pchar;
36 function strscan(p : pchar;c : char) : pchar;
37 function strrscan(p : pchar;c : char) : pchar;
38 function strlower(p : pchar) : pchar;
39 function strupper(p : pchar) : pchar;
40 function strlicomp(str1,str2 : pchar;l : longint) : longint;
41 function strpos(str1,str2 : pchar) : pchar;
42 function strnew(p : pchar) : pchar;
44 { Different from strings unit - ansistrings or different behaviour }
45 function StrPas(Str: PChar): string;
46 function StrPCopy(Dest: PChar; Source: string): PChar;
47 function StrPLCopy(Dest: PChar; Source: string; MaxLen: cardinal): PChar;
48 function StrAlloc(Size: cardinal): PChar;
49 function StrBufSize(Str: PChar): cardinal;
50 procedure StrDispose(Str: PChar);
54 Revision 1.1 2002/02/19 08:25:45 sasu
57 Revision 1.1 2000/07/13 06:31:01 michael
60 Revision 1.5 2000/02/09 16:59:32 peter
63 Revision 1.4 1999/08/24 13:14:51 peter
64 * disposestr allocstr compatible with delphi