ActiveX properties

[Roberto Parisi]

...
oObj := TActiveX():New(oWnd, "MyControl")
oPanels := oObj:GetProp("Panels")
oPanels:Do("Add", "Item 1")
oPanels:Do("Add", "Item 2")
...

Can I access to activex properties like this?

Regards

[Antonio Linares]

Roberto,

oPanels is not an ActiveX, so you have to do it this way:

Code: Select all  Expand view  RUN

oObj := TActiveX():New(oWnd, "MyControl")
oPanels := oObj:GetProp( "Panels" )
OleInvoke( oPanels, "Add", "Item 1" )
OleInvoke( oPanels, "Add", "Item 2" )


[Roberto Parisi]

Thx Antonio, now it works.

What about a more simple access to propertyies and methods like xHarbour Activex?

oObj := TActiveX():New(oWnd, "MyControl")
oObj:Panels:Add("Item1")
oObj:Panels:Add("Item2")
...

Regards,
Roberto Parisi

[Antonio Linares]

Roberto,

Yes, we may implement it.