Запомнить меня на этом копьютере
Пример программы для функции Copy.
{Copy.PAS} { Пример программы для функции Copy } Var S : String; Begin S:='ABCDEF'; S:=Copy(S, 2, 3); { 'BCD' } End.
Скачать copy.pas