Модуль: SysUtils

Описание
Функция копирует Паскаль-строку Source в длинную строку Dest и возвращает указатель на Dest. Данная функция не производит проверку длины, поэтому для того, чтобы не возникало ошибок необходимо, чтобы результирующая строка вмещала Length(Source) + 1 символ.

Пример
var
   Source: string;
   Dest: array[0..20] of Char;
begin
   Source:= 'Копируем строку';
   StrPCopy( Dest, Source);
   MessageDlg( Dest, mtInformation, [mbOk], 0);
end;