Com问题求教(结构化存储)

Question

跟踪显示出来的东西不可尽信.
用代码判断 if Asssigned(ist) then ....

Answer 1

可是这是标准的Com调用结果判断啊，另外，我在VC中调用也是得到一样的效果。

Answer 2

嗯..我没有试过这样写,
但我这儿用是成功的.  if StgOpenStorage(StringToOleStr(fname),
    nil,
    STGM_READWRITE or STGM_SHARE_EXCLUSIVE,
    nil,0,
    stgroot
  )=S_OK then
  begin
//    ShowMessage('Open OK');

Answer 3

我觉得你应用
VAR 带回IST