Delphi-Help

Delete

Печать
Рейтинг пользователей: / 0
ХудшийЛучший 

Delete

Описание

procedure Delete ( var Source : string; StartChar : Integer; Count : Integer ) ;

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

Пример кода

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

Source теперь : 1278

Примечание

Если StartChar находится перед первым символом, или после последнего символа Источника (Source), то никакие символы не будут удалены.
Delete(myString, 5, MaxInt);
является эквивалентным и будет лучше выполнено:
SetLength (myString, 4);

Авторизация



Счетчики