delphi也是用trim函数。 另外还有trimleft和trimright
varstr:string;beginstr := 'abcdefghigklmn';Delete(str,Length(str)-4,5);ShowMessage(str);end;