PostHeaderIconDelphi. Процедура Insert ( Source: string; var S: string; Index: Integer );

Процедура Insert ( Source: string; var S: string; Index: Integer );

Модуль: System

Описание
Процедура вставляет подстроку, определенную в параметре Source, в позицию Index строки S (первый символ в строке имеет индекс 1).

Пример
var
   S: string;
begin
   S:= 'Казнить нельзя помиловать.';
   Insert( '!', S, 8);     { S := 'Казнить! нельзя помиловать.'}
   MessageDlg( S, mtWarning, [mbOK],0);
end;

 
Copyright © 2007-2010 IsIProg.ru. All Rights Reserved.