[Overview][Procedures and functions][Index] |
Concatenate 2 null-terminated strings.
Source position: strings.pp line 43
function strcat( |
dest: pchar; |
source: pchar |
):pchar; |
Attaches Source to Dest and returns Dest.
No length checking is performed.
|
Concatenate 2 null-terminated strings, with length boundary. |
Program Example11; Uses strings; { Program to demonstrate the StrCat function. } Const P1 : PChar = 'This is a PChar String.'; Var P2 : PChar; begin P2:=StrAlloc (StrLen(P1)*2+1); StrMove (P2,P1,StrLen(P1)+1); { P2=P1 } StrCat (P2,P1); { Append P2 once more } Writeln ('P2 : ',P2); StrDispose(P2); end.