Insert 函数的问题

atiger

Business 平台的实现，参考如下：
程序示例 一 2
procedure TMainForm.ButtonstringClick(Sender: TObject);
var
s,v:string;
begin
  s:='sfdfafg';
  v:='sss';
  s:=s.Insert(3,v);
  Dialogs.ShowMessage(s);   //  显示的效果为abcsssd
end;


函数声明： function insert(startindex: integer; value: string): string;
引用单元：Business.System. SysUtils
参数说明：
   返回值：在原来字符串的startindex位置插入字符串value后的值。
 startindex：在字符串中需要插入字符串的位置。
 Value：要插入的字符串。