M midastime Unregistered / Unconfirmed GUEST, unregistred user! 2006-06-29 #1 初次接触delphi编程。现在想学习一下流的应用。将一字符串写入流后，假设写入stream1，如何将这个流还原为字符串呢？请各位大侠赐教。初学，勿笑。另外什么地方能找到关于流的教程例子啥的。最好能简单点的。谢谢[^]
初次接触delphi编程。现在想学习一下流的应用。将一字符串写入流后，假设写入stream1，如何将这个流还原为字符串呢？请各位大侠赐教。初学，勿笑。另外什么地方能找到关于流的教程例子啥的。最好能简单点的。谢谢[^]
X xiaoxiao586 Unregistered / Unconfirmed GUEST, unregistred user! 2006-06-29 #3 stream1.position := 0; stream1.read(str,stream1.size);
韦 韦剑 Unregistered / Unconfirmed GUEST, unregistred user! 2006-06-29 #5 procedure TForm1.Button1Click(Sender: TObject); var ms:TMemoryStream; s:string; begin ms:=TMemoryStream.Create; ms.Write(Edit1.Text[1],Length(Edit1.Text)); showmessage('ok!'); SetLength(s,ms.Size); ms.Position:=0; ms.Read(s[1],ms.Size); Edit2.Text:=s; ms.Free end;
procedure TForm1.Button1Click(Sender: TObject); var ms:TMemoryStream; s:string; begin ms:=TMemoryStream.Create; ms.Write(Edit1.Text[1],Length(Edit1.Text)); showmessage('ok!'); SetLength(s,ms.Size); ms.Position:=0; ms.Read(s[1],ms.Size); Edit2.Text:=s; ms.Free end;
M midastime Unregistered / Unconfirmed GUEST, unregistred user! 2006-07-01 #6 谢谢各位大大哦。 小生还碰到个问题，请大家帮帮我这个新手啊。 http://www.delphibbs.com/delphibbs/dispq.asp?lid=3493120 是关于数据结构中的队列的使用的。
谢谢各位大大哦。 小生还碰到个问题，请大家帮帮我这个新手啊。 http://www.delphibbs.com/delphibbs/dispq.asp?lid=3493120 是关于数据结构中的队列的使用的。
