Процедура 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

См. также: