Группы и рассылки:

Вы здесь

Delete (процедура)

Процедура Delete – удаляет из заданной строки подстроку с определенной программистом позиции и определенное количество символов. Процедура Delete входит в состав библиотеки System и имеет три входных параметра - текстовую строку, в которой будет произведено удаление части текста,  стартовая позиция и кол-во символов для удаления.
 
Синтаксис процедуры: 
Delete(var S: string; Index, Count:Integer);
 
где:
S – строка в которой удаляем символы;
Index – номер символа в строке с которого начнется удаление.
Count – задает количество удаляемых символов строки.
 
Пример. Удалим из строки «Эта_веселая_жизнь!»  4 символа с позиции 1.
 
Смотрим пример:

procedure TForm1.Button1Click(Sender: TObject);
var sMsg:string;
begin
sMsg:='Эта_веселая_жизнь!';
  delete(sMsg,1,4);

   ShowMessage(sMsg);
end;


Результат: «веселая_жизнь!»
 

Примечание: Обратите внимание что удаление происходит в той строке которая задается как параметр. Будьте внимательны, если в дальнейшем потребуется использовать эту переменную с первоначальным ее содержимым.

Разместить свое видео на сайте
Вы можете разместить свои 
видео-уроки на сайте
БЕСПЛАТНО!


Подробнее>>>