Q qdyoung Unregistered / Unconfirmed GUEST, unregistred user! 2002-06-18 #2 MemoryStream.WriteBuffer(@str, Length(str)) ----- http://www.8421.org
M mlzhou Unregistered / Unconfirmed GUEST, unregistred user! 2002-06-18 #3 MemoryStream.WriteBuffer(@str, Length(str)) MemoryStream.ReadBuffer(@str, Length(str))
L LGXing Unregistered / Unconfirmed GUEST, unregistred user! 2002-06-18 #4 MemoryStream.WriteBuffer(str[1], Length(str)) MemoryStream.ReadBuffer(str[1], Length(str))
B beta Unregistered / Unconfirmed GUEST, unregistred user! 2002-06-18 #5 var s, t: string; Stream: TStringStream; begin s := 'hello world'; Stream := TStringStream.Create(s); //把字符串存入 //...... t := Stream.DataString; //从内存流中读出来 ShowMessage(t); Stream.Free; end;
var s, t: string; Stream: TStringStream; begin s := 'hello world'; Stream := TStringStream.Create(s); //把字符串存入 //...... t := Stream.DataString; //从内存流中读出来 ShowMessage(t); Stream.Free; end;