Модуль: SysUtils

Описание
Функция копирует MaxLen символов из Паскаль-строки Source в длинную строку Dest и возвращает указатель на Dest.

Пример
var
   S: string;
   Dest: array[0..255] of Char;
   i: byte;
begin
   S:= 'http://www.atrussk.ru/delphi/index.htm';
   i:= LastDelimiter( '/', S);
   StrPLCopy( Dest, S, i);     { Dest:= http://www.atrussk.ru/delphi/ }
   MessageDlg( Dest, mtInformation, [mbOk], 0);
end;