Справочник по Delphi

Insert, процедура

Синтаксис


prccedure Insert(const Ins:  string;  var Str:  string;   Index:  Integer);

Описание

Процедура Insert вставляет строку Ins в строку Str в позиции Index. Если Index <= 1, Ins вставляется в начало строки. Если Index находится за концом строки, Ins дописывается в конец Str.
Insert не является настоящей процедурой.

Ошибки

Советы и приемы

Индекс первого символа строки равен 1.

Пример


// Вставляем букву диска в начало строки пути.
procedure InsertDriveLetter(var Path: string; const Drive: Char);
begin
  // Сначала убеждаемся, что путь не содержит буквы диска в начале.
  if (Length(Path) < 2) or (Path[2] <> ':') then
  // Insert the drive at the start of the path.
  Insert(Drive + ':', Path, 1);
end;

Смотрите также

Функция Copy, процедуры Delete, SetLength, SetString.

Учебник по языку Pascal Лабораторные работы по программированию Справочник

Нет комментариев.

Оставить комментарий: