Przemysław Czerpak wrote:
>
> You should simply use:
>
> WIN_OleServerInit( CLS_ID, CLS_Name, {|| Vouch32ActiveX():new() } )
>
> or because Vouch32ActiveX object does not have any instance variables
> to safe some memory and increase a little bit the speed you can use
> only one HVM Vouch32ActiveX object for all OLE object:
>
> WIN_OleServerInit( CLS_ID, CLS_Name, Vouch32ActiveX():new() )
>
> Both versions will work for you.
>
Done.
>> But the problem is when I am accessing its methods as such:
>> Function Main()
>> Local oGraph, oServer
>> if !( CreateVouch32( @oServer ) )
>> Return nil
>> endif
>> oGraph := oServer:Vouch32GraphicsServer() /* IT IS OK HERE */
>> oGraph:Create() /* RTE - See Below */
>> oGraph:Destroy()
>> Return nil
>
> I think the RTE is in this line:
> oGraph := oServer:Vouch32GraphicsServer() /* IT IS OK HERE */
> If you remove the 4-rd .T. parameter from WIN_OleServerInit() then
> this line will work successfully but your code will fail in this line:
> oGraph:Create() /* RTE - See Below */
> because oGraph is NIL not OLE object. It will happen because I haven't
> implemented so far automatic conversion of HVM object returned by OLE
> methods to OLE objects.
>
> Is above description correct?
>
Absolutely yes.
-----
enjoy hbIDEing...
Pritpal Bedi
http://hbide.vouch.info/
--
View this message in context:
http://harbour-devel.1590103.n2.nabble.com/SF-net-SVN-harbour-project-14593-trunk-harbour-tp5100733p5102006.html
Sent from the harbour-devel mailing list archive at Nabble.com.
_______________________________________________
Harbour mailing list (attachment size limit: 40KB)
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour
