调试时，不规则地报错“不支持此接口”，有关olecontainer的问题！(50分)

var
oStream : TBlobStream;

table_yhsj.Open;
oStream:=nil;
oStream := TBlobStream.Create(table_yhsj.FieldByName('报表') as TBlobField, bmRead);
OleContainer1.LoadFromStream(oStream);
ostream.Position:=0;
Olecontainer1.DoVerb(ovPrimary);
oStream.Free;
table_yhsj.Close;
上面的代码我是用rztreeview的双击事件激活的，运行时重复的双击rztreeview，调用ondblclick，就可能出现报错“不支持此接口，？？
用的delphi6，系统是2000，刚重装不久，之前一直没这种问题的
刚才打开进程运行程序，发现原来是重复运行程序几次，excel进程给kill掉了，？

帮顶！

╭=========================================╮

80G海量源代码,控件，书籍全免费狂下不停！

http://www.source520.com

╰=========================================╯