strlcat
Concatenate 2 null-terminated strings, with length boundary.
Declaration
Source position: strings.pp line 64
function strlcat(dest: PChar; source: PChar; l: SizeInt) : PChar;
Description
Adds L characters from Source to Dest, and adds a terminating null-character. Returns Dest.
Errors
None.
See also
Name | Description |
---|---|
StrCat | Concatenate 2 null-terminated strings. |
Example
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.