Пожалуйста, включите JavaScript для просмотра этого сайта.

Скрипты Simple-Scada

Синтаксис

procedure UTF8Insert(const AInsertStr: UTF8String; var ATargetStr: UTF8String; APosition: Integer);

Описание

Вставляет строку AInsertStr в строку ATargetStr в позицию APosition.

Пример кода

var
  Source: UTF8String;
begin
  Source := '12345678';
  UTF8Insert('-+-', Source, 3); // Source = 12-+-345678
end.