Модуль: System

Описание
Процедура удаляет подстроку, содержащую Count символов из строки S. Подстрока начинается в S[Index]. Параметр Index определяет индекс первого символа удаляемой подстроки. Первый символ в строке имеет индекс 1. Если значение Count превышает количество символов, которое может быть удалено, то процедура удаляет все символы, начиная с S[Index], до конца строки.

Пример
var
   S: string;
begin
   S:= 'Казнить, нельзя, помиловать!';
   Delete(S, 8, 1);     // S := 'Казнить нельзя, помиловать!'
   MessageDlg(S, mtWarning, [mbOK],0);
end;