求助:关于OLE Automation Server中对象的属性(100分)

  • 主题发起人 主题发起人 artx
  • 开始时间 开始时间
A

artx

Unregistered / Unconfirmed
GUEST, unregistred user!
我做了个OLE Automation Server,其中Automation对象有一属性类型为TStringList,请问怎样把此属性传出来?
 
送TStringlist的text
 
OLE AUTOMATION 只支持WIDESTRING, 所以, 可以把TStringList.Text
转成WIDESTRING, 作为一个属性传出就是. :-)
 
但我想传一个对象,该怎么做?谢谢指点...*_^
 
实现这个对象的Interface
然后传送它的Interface
 
用OleVariant 或 IDispatch 或 IUnknown试试.
 
tqz,cytown,能具体讲讲怎么做吗???谢谢
 
比如说,在OLE Auto的TLB中加一个Interface,使其的property和Method与你要实
现的对象一一对应。然后在OLE Auto的对象中用某个property引用这个Interface好了
 
tqz,能不能给我一个申明这个Interface的例子?使它和TStringList对应...
(我没做出来:-( )
非常感谢!!!
 
Delphi的VCL对象不能直接传,将TStringList.SaveToStream的Stream To Variant来传
接收到再Variant To Stream再TStringList.LoadFromSteam

将不可视对象直接转成Stream的方法请查看 DELPHI 的 ObjectBinaryToText 方法中的Example
 
多人接受答案了。
 
后退
顶部