Skip to content

    strpcopy

    Copy a pascal string to a null-terminated string.

    Declaration

    Source position: strings.pp line 28

    function strpcopy(d: PAnsiChar; const s: shortstring) : PAnsiChar;

    Description

    Converts the Pascal string in Se to a Null-terminated string, and copies it to D. D needs enough room to contain the string Source, i.e. Length(S)+1 bytes.

    Errors

    No length checking is performed.

    See also

    Name Description
    StrPas Convert a null-terminated string to a shortstring.

    Example

    Program Example2;

Uses strings;

{ Program to demonstrate the StrPCopy function. }

Const S = 'This is a normal string.';

Var P : Pchar;

begin
  p:=StrAlloc (length(S)+1);
  if StrPCopy (P,S)<>P then
    Writeln ('This is impossible !!')
  else
    writeln (P);
  StrDispose(P);  
end.