Основы Delphi
Delete
Процедура
Удаляет часть символов из строки System unit
  procedure Delete ( var Source : string; StartChar : Integer; Count : Integer ) ;
Описание
Процедура 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
 



© Форум Delphi   |  Блог программистов   |  Создание и продвижение сайтов - "Веб сателлит"  |  Ссылки   |  Английская версия

Warning: require_once(/home/program/delphibasics.ru/docs): failed to open stream: No such file or directory in /home/program/delphibasics.ru/docs/niz.inc on line 32

Fatal error: require_once(): Failed opening required '' (include_path='.:/home/program/delphibasics.ru/php') in /home/program/delphibasics.ru/docs/niz.inc on line 32