Page 1 of 1
ActiveX problem?
Posted: Sat Apr 28, 2007 11:31 am
by Taiwan
Hello Antonio,
Look it below:
Code: Select all | Expand
DEFINE WINDOW oWnd TITLE "Test ActiveX"
oActX := TActiveX():New( oWnd, "Codejock.ReportControl.10.4.2" )
oWnd:oClient = oActX
ACTIVATE WINDOW oWnd
Code: Select all | Expand
DEFINE DIALOG oDlg RESOURCE "Test_ACTIVEX"
oActX := TActiveX():ReDefine( 100, oDlg, "Codejock.CalendarControl.10.4.2" )
ACTIVATE DIALOG oDlg
Regards,
Richard
Posted: Sat Apr 28, 2007 12:02 pm
by Taiwan
Hello Antonio,
Add a method below:
Code: Select all | Expand
DEFINE WINDOW oWnd TITLE "Test ActiveX"
oActX := TActiveX():New( oWnd, "Codejock.ReportControl.10.4.2" )
oWnd:oClient = oActX
oActX:Do( "SetVirtualMode", 1000 )
ACTIVATE WINDOW oWnd
Work fine. Please look Message 1 of picture 1
Code: Select all | Expand
DEFINE DIALOG oDlg RESOURCE "Test_ACTIVEX"
oActX := TActiveX():ReDefine( 100, oDlg, "Codejock.CalendarControl.10.4.2" )
oActX:Do( "SetVirtualMode", 1000 )
ACTIVATE DIALOG oDlg
I got error message.
Regards,
Richard
Posted: Sat Apr 28, 2007 3:42 pm
by Antonio Linares
Code: Select all | Expand
DEFINE DIALOG oDlg RESOURCE "Test_ACTIVEX"
REDEFINE ACTIVEX oActX ID 100 OF oDlg PROGID "Codejock.CalendarControl.10.4.2"
ACTIVATE DIALOG oDlg ;
ON INIT ( oActX:nTop := 0, oActX:nLeft := 0, oActX:nWidth := oDlg:nWidth, oActX:nHeight := oDlg:nHeight, oActX:Do( "SetVirtualMode", 1000 )
Posted: Sat Apr 28, 2007 7:01 pm
by James Bott
Richard or Antonio,
I don't know much about ADO, but unlike Word or Excel, the calendar control is not (I presume) already installed on the users computer. So how does this work; is the control linked into the app as a library?
James
