Question

Delphi TStringStream 转换String ？？？？

procedure TForm1.Button1Click(Sender: TObject);
var
ss:TStringStream;
str:String;
begin
ss:=TStringStream.Create('');
for i:=0 to 99 do
begin
ssThickness.WriteString(Floattostr(i+1)+',');
end;

str:= ？？？SS ; //？？？此处怎样转换到字符串?

end;

Answer 1

str:=ss.datastring;

Answer 2

ss.Position = 0;

str := ss.ReadString(ss.Size);

Answer 3

str := ss.ReadString(ss.Size);