高分请教关于TStream和olevariant的问题

Question

在内存中已经读取了olevariant的数据，我想把它转成TStream，如何做？

Answer 1

简单的可以如下。如果你有IStream接口，可以用TOleStream（AxCtrls单元）来读写。
var
  OV: OleVariant;
  S: String;
  MMStream: TMemoryStream;
begin
  //OV := ;
  S := VarToStr(OV);
  MMStream := TMemoryStream.Create;
  MMStream.Write(S[1], Length(S));
  MMStream.Free;
end;————————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
————————————————————————————————————

Answer 2

http://haitian.myrice.com/ByteDataTrans.txt

Answer 3

同意 lxpbuaa(桂枝香在故国晚秋)