var
s: TStringList;
I: Integer;
begin
//ShowMessage('Hello FastScript');
s := TStringList.Create;
try
s.Add('a');
s.Add('b');
ShowMessage(s.Text);
finally
s.Free;
end;
end.
var
s: TStringList;
I: Integer;
begin
//ShowMessage('Hello FastScript');
s := TStringList.Create;
try
s.Add('a');
s.Add('b');
ShowMessage(s.Text);
finally
s.Free;
end;
end.
转载于:https://www.cnblogs.com/chenlala/archive/2013/01/14/2860472.html