Согласие на обработку персональных данных.

08.04.2019
Новый выпуск журнала Автоматизация и программирование.

27.04.2019
Новые видео и статья Процедура Dispose.

23.04.2019
Новые видео и статья Как передать массив в функцию.

19.04.2019
Новая задача Как преобразовать секунды в часы-минуты-секунды.

07.03.2019
Новый выпуск журнала Автоматизация и программирование.



Раздел: Стандартные функции Паскаля

Процедура Delete

Процедура Delete в Паскале удаляет часть строки. Синтаксис:

 
procedure Delete(var s : shortstring;
                 index : SizeInt;
                 count : SizeInt);

procedure Delete(var s : RawByteString;
                 index : SizeInt;
                 count : SizeInt);

procedure Delete(var s : UnicodeString;
                 index : SizeInt;
                 count : SizeInt);

procedure Delete(var s : shortstring;
                 index : SizeInt;
                 count : SizeInt);

Процедура Delete удаляет символы из строки s, начиная с позиции, указанной в параметре index. Количество удаляемых символов указано в параметре count.

Все символы, которые находятся после удаленных символов, сдвигаются на count позиций влево, а длина строки исправляется.

Если, например, в строке 10 символов, и вы укажете начальную позицию 5, а количество символов 10 (то есть 5 + 10 = 15 - это больше длины строки), то ничего страшного не произойдёт. Просто строка будет обрезана, начиная от позиции, указанной в параметре index.

Также ничего страшного не произойдёт, если в параметре index вы укажете значение, которое превышает размер строки. В этом случае из строки не будут удалены никакие символы.

Пример программы:

program deleteproc;

var s   : string = 'Hello! WORLD!';

//****************************************************************
// ОСНОВНАЯ ПРОГРАММА
//****************************************************************
begin
  WriteLn(s);       //Выведет Hello! WORLD!

  Delete(s, 7, 6);  //Удаляем пробел и WORLD
  WriteLn(s);       //Выведет Hello!!

  WriteLn('The End. Press ENTER...');
  ReadLn;
end.


Как стать программистом 2.0 Как стать программистом 2.0

Эта книга для тех, кто хочет стать программистом. На самом деле хочет, а не просто мечтает. И хочет именно стать программистом с большой буквы, а не просто научиться кулебякать какие-то примитивные программки… Подробнее...
Инфо-МАСТЕР ®
Все права защищены ©
e-mail: mail@info-master.su

Яндекс.Метрика