delphi里如何将string格式的转化为二进制的stream呢?

Question

小弟在做一个SOCKET接口!writestream();中需要填入的是Tstream格式的!怎样将一个string变量转换过去呢?谢谢!

Answer 1

确信你的Uint中包括了Psock(即:Use PSock;)
然后使用StreamLn方法就可将String 转化为Stream;
如:
var
  Strm:TMemoryStream;
  str:String;
begin
  TmemoryStream.Create;
  StreamLn(Strm,str);//字符串已经被存入Strm流中。
end;
    
对了最后不用Strm时别忘了：Strm.free;
你可以看一看Delphi5 关于StreamLn的帮助，自己可试着编个可以还回Stream类型的Function.
OK?

Answer 2

用的是INDY！！并没有PSOCKET！不过还是么谢谢楼上的了！

Answer 3

在DELPHI7里面USES里加入PSOCK会显示FILE NOT FOUND:NMconst.dcu!!TStringStream何意，能讲讲么？谢了！

Answer 4

SetLength(str, your length);
stream.write(str[1], length(str));SetLength(str, your length);
stream.read(str[1], length(str));

Answer 5

procedure StrToStream(s:string;desStream:TStream);
var
   ssm:TStringStream;
begin
   ssm:=TStringStream.create(s);
   desStream.copyfrom(ssm,ssm.size);
end;