Процедура Insert

Вставляет подстроку в строку.

Объявление:

Procedure Insert(Source : String; Var S : String; Index : Integer);

Режим:

Windows, Real, Protected

Замечание:

Параметр Source - выражение со строковым типом.
Параметр S - переменная со строковым типом любой длины.
Index - выражение целочисленного типа.
Процедура Insert вставляет строку Source в строку S в позиции с номером Index.
Если возникающая в результате строка длиннее 255-и символов, то она усекается после 255-го символа.

Пример:

{ Пример программы для процедуры Insert }

Var S : String;

Begin
 S:='D00M forever !';
 Insert('& UNIX ', S, 6);
 WriteLn(S); { 'D00M & UNIX forever!' }
End.