Синтаксис
procedure Insert(AInsertStr: string; var ATargetStr: string; Index: Integer);
Описание
Вставляет строку AInsertStr в строку ATargetStr в позицию Index.
Пример кода
var
Source: string;
begin
Source := '12345678';
Insert('-+-', Source, 3); // Source = 12-+-345678
end.