Процедура Insert
Вставляет подстроку в строку.
Объявление:
Procedure Insert(Source : String; Var S : String; Index : Integer);
Режим:
Замечания:
Параметр Source - выражение со строковым типом. Параметр S - переменная со
строковым типом любой длины. Index - выражение целочисленного типа.
Процедура Insert вставляет строку Source в строку S в позиции с номером
Index. Если возникающая в результате строка длиннее 255-и символов, то она
усекается после 255-го символа.
Пример:
Var S : String;
Begin
S:='D00M forever !';
Insert('& UNIX ', S, 6);
WriteLn(S); { 'D00M & UNIX forever!' }
End.
Пример программы: insert.pas
См. также: