Function StrECopy (Dest,Source : PChar) : PChar;
Copies the Null-terminated string in Source to Dest, and returns a pointer to the end (i.e. the terminating Null-character) of the copied string.
No length checking is performed.
Program Example6; Uses strings; { Program to demonstrate the StrECopy function. } Const P : PChar = 'This is a PCHAR string.'; Var PP : PChar; begin PP:=StrAlloc (StrLen(P)+1); If Longint(StrECopy(PP,P))-Longint(PP)<>StrLen(P) then Writeln('Something is wrong here !') else Writeln ('PP= ',PP); end.