[Overview][Constants][Types][Classes][Procedures and functions][Variables][Index] |
Concatenate 2 null-terminated strings, with length boundary.
Source position: syspchh.inc line 28
function strlcat( |
dest: pchar; |
source: pchar; |
l: SizeInt |
):pchar; |
dest: pwidechar; |
source: pwidechar; |
l: SizeInt |
):pwidechar; |
Adds MaxLen characters from Source to Dest, and adds a terminating null-character. Returns Dest.
None.
|
Concatenate 2 null-terminated strings. |
Program Example12; Uses strings; { Program to demonstrate the StrLCat function. } Const P1 : PChar = '1234567890'; Var P2 : PChar; begin P2:=StrAlloc (StrLen(P1)*2+1); P2^:=#0; { Zero length } StrCat (P2,P1); StrLCat (P2,P1,5); Writeln ('P2 = ',P2); StrDispose(P2) end.