Справочник функций и процедур Delphi: Delete

  Навигация по первой букве:

A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z

  Навигация по категории:

Compiler directives, Directives, Keywords / Types, Variables, Constants / Functions, Procedures

Delete
Процедура
Удаляет часть символов из строки System unit
  procedure Delete ( var Source : string; StartChar : Integer; Count : Integer ) ;

Delphi Sources

Описание
Процедура Delete удаляет последовательность символов вплоть до символа Count из строки источника, начиная с позиции StartChar. Процедура вырезает символы из строки и после этого сдвигает символы справа на их место.

Ошибка не произойдет, если Count превышает реальную длину строки.

Первый символ строки = 1.
Примечания
Если StartChar находится перед первым символом, или после последнего символа Источника (Source), то никакие символы не будут удалены.

Delete(myString, 5, MaxInt);

является эквивалентным и будет лучше выполнено:

SetLength (myString, 4);
Похожие команды
Concat  Соединяет несколько строк в одну

Copy  Создает копию части строки или части массива

Insert  Вставляет строку в другую строку

Move  Копирует байты данных из источника в место назначения

StringOfChar  Создает строку из одного символа, повторенного много раз

StringReplace  Заменяет одну или несколько подстрок, найденных в заданной строке

WrapText  Добавьте перенос строки в строку, чтобы имитировать перенос слов

Trim  Удаляет начальные и конечные пробелы в строке

TrimLeft  Удаляет начальные пробелы в строке

TrimRight  Удаляет конечные пробелы в строке

 
Пример кода : Удаление символов из середины строки
var
  Source : string;

begin
  Source := '12345678';
  Delete(Source, 3, 4);    // Удаление 3-го, 4-го, 5-го и 6-го символов
  ShowMessage('Source теперь : '+Source);
end;

Source теперь : 1278
 


Последние добавленные на сайт исходники

TDictionary Custom Sort

Fast Watermark Sources

3D Designer

Sik Screen Capture

Patch Maker

Айболит (remote control)

 

ListBox Drag & Drop

Доска для игры Реверси

Графические эффекты

Рисование по маске

Перетаскивание изображений

Canvas Drawing

 

Copyright © 2004-2024 "Delphi Sources" by BrokenByte Software (источник – "DelphiBasics")

Группа ВКонтакте