关于‘流’的操作

Question

long ReadfromBuffer( VARIANT FAR* data )//这是cell的一个函数我想让他从流里读写数据，需要一个VARIANT类型的指针，我定义了一个，可是不知道如何让他工作，代码如下：var
ptr:^VARIANT;
mystr:TfileStream;
begin
ptr:=@mystr;
if opendialog1.Execute then
begin
mystr:=TfileStream.Create(opendialog1.filename,fmopenread);
try
cell1.ReadFromBuffer(ptr^);//执行到这里出错
finally
mystr.Free;
end;
end;

Answer 1

ptr:=@mystr;指到哪去？你应该在它创建后mystr:=TfileStream.Create(opendialog1.filename,fmopenread); 才  ptr:=@mystr;

Answer 2

创建后mystr:=TfileStream.Create(opendialog1.filename,fmopenread); 才  ptr:=@mystr;
仍然有问题：无效的变体记录类型
我想让ptr指向mystr的buffer

Answer 3

刚才查了一下cell的技术手册，cell的组件不支持此函数，只有插件材支持，郁闷阿，不过还是谢谢 hch_45(んこん) ， S.F.(萧寒(Chinasf)) 得热心帮助！