Delphi动态数组中删除元素的重要函数Delete

System.Delete从字符串中删除一个子串，或者从动态数组中删除元素，并返回修改后的数组。

在Delphi代码中，Delete从字符串或数组S中删除一个由Count字符组成的子串，从S[Index]开始。S是一个字符串类型的变量。Index和Count是整数型表达式。

如果Index大于字符串或数组的长度（或小于1），则不删除任何字符。

如果Count指定的字符或数组字段超过了从Index开始的长度，那么Delete将删除字符串或数组的其余部分。如果Count小于或等于0，则不删除任何字符。

注意：Delete使用基于一的数组索引，即使在字符串为零的平台上颈椎枕也是如此。

procedure TForm1.Button1Click(Sender: TObject);
var
  s: string;
begin
  s := 'Honest Abe Lincoln';
  Canvas.TextOut(10, 10, s);
  Delete(s,8,4);
  Canvas.TextOut(10, 40, s);	{ 'Honest Lincoln' }
end;