Календарь
< Сентябрь 2011 >
П В С Ч П С В
      1 2 3 4
5 6 7 8 9 10 11
12 14 15 16 17 18
19 20 21 22 23 24 25
26 27 28 29 30    
Теги

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


Объявлене:
Procedure Insert(Source : String; Var S : String; Index : Integer);
Режим:
Windows, Real, Protected
Замечания:

Параметр Source - выражение со строковым типом. Параметр S - переменная со строковым типом любой длины. Index - выражение целочисленного типа. Процедура Insert вставляет строку Source в строку S в позиции с номером Index. Если возникающая в результате строка длиннее 255-и символов, то она усекается после 255-го символа.
Пример: 1 { Пример программы для процедуры Insert }
2
3 Var S : String;
4
5 Begin
6 S:='D00M forever !';
7 Insert('& UNIX ', S, 6);
8 WriteLn(S); { 'D00M & UNIX forever!' }
9 End.