Look it below:
Code: Select all
DEFINE WINDOW oWnd TITLE "Test ActiveX"
oActX := TActiveX():New( oWnd, "Codejock.ReportControl.10.4.2" )
oWnd:oClient = oActX
ACTIVATE WINDOW oWnd
Code: Select all
DEFINE DIALOG oDlg RESOURCE "Test_ACTIVEX"
oActX := TActiveX():ReDefine( 100, oDlg, "Codejock.CalendarControl.10.4.2" )
ACTIVATE DIALOG oDlg
Regards,
Richard