Процедура Delete

Объявление:

Procedure Delete(Var S : String; Index : Integer; Count : Integer);

Режим: Windows,  Protected,  Real

Замечания:
Параметр S - переменная со строковым типом. Index и Count - целочисленные выражения. Delete удаляет Count символов из строки S, начиная с позиции Index. Если значение Index больше, чем длина S, то никакие символы не удаляются. Если Count определяет большее количество символов, чем остается в строке с позиции Index до конца строки, то удаляется остаток строки.

Пример программы: delete.pas

Код примера

 Uses WinCrt;
 
 Var S : String;
 
 Begin
 S:='Unix & Windows forever!';
 Delete(S, 6, 10);
 WriteLn(S); { 'Unix forever!' }
 End.