AppendStr

函式功能

在字元串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