Процедура Delete в Delphi удаляет часть символов из строки.
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);
Процедура Delete: Удаление символов из середины строки
var
Source : string;
begin
Source := '12345678';
Delete(Source, 3, 4); // Удаление 3-го, 4-го, 5-го и 6-го символов
ShowMessage('Source теперь : '+Source);
end;Результат
Source теперь : 1278
Похожие функции, процедуры и команды
Concat — соединяет несколько строк в одну.
Copy — создает копию части строки или части массива.
Insert — вставляет строку в другую строку.
Move — копирует байты данных из источника в место назначения.
StringOfChar — создает строку из одного символа, повторенного много раз.
StringReplace — заменяет одну или несколько подстрок, найденных в заданной строке.
WrapText — добавьте перенос строки в строку, чтобы имитировать перенос слов.
Trim — удаляет начальные и конечные пробелы в строке.
TrimLeft — удаляет начальные пробелы в строке.
TrimRight — удаляет конечные пробелы в строке.
Угостить автора чашечкой кофе