函数功能

函数说明

函数功能

在字符串Dest后追加字符串S

函数说明

首部 procedure AppendStr(var Dest: string; const S: string); deprecated; $[SysUtils.pas

功能 在字符串Dest后追加字符串S

说明 相当于Dest := Dest + S;Delphi6已经不建议使用

参考 <NULL>

例子

////////Begin AppendStr

procedure TForm1.Button1Click(Sender: TObject);

var

S: string;

begin

S := Edit2.Text;

AppendStr(S, Edit1.Text);

Edit2.Text := S;

end;

////////End AppendStr