Процедура 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 — видаляє кінцеві пробіли в рядку.
Пригостити автора кавою