topic-6835

Posts: 218

Joined: Fri Oct 07, 2005 01:55 AM

ActiveX problem?
Posted: Sat Apr 28, 2007 11:31 AM

Hello Antonio,

Look it below:

DEFINE WINDOW oWnd TITLE "Test ActiveX"

  oActX := TActiveX():New( oWnd, "Codejock.ReportControl.10.4.2" )
  oWnd:oClient = oActX
ACTIVATE WINDOW oWnd

Code: Select all Collapse

DEFINE DIALOG oDlg RESOURCE "Test_ACTIVEX"

oActX := TActiveX():ReDefine( 100, oDlg, "Codejock.CalendarControl.10.4.2" )
ACTIVATE DIALOG oDlg

Regards,

Richard

Taiwan

Posts: 218

Joined: Fri Oct 07, 2005 01:55 AM

ActiveX problem?
Posted: Sat Apr 28, 2007 12:02 PM

Hello Antonio,

Add a method below:

Code: Select all Collapse

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 Collapse

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

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

ActiveX problem?
Posted: Sat Apr 28, 2007 03:42 PM

Code: Select all Collapse

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 )

regards, saludos

Antonio Linares
www.fivetechsoft.com

James Bott

Posts: 4840

Joined: Fri Nov 18, 2005 04:52 PM

ActiveX problem?
Posted: Sat Apr 28, 2007 07:01 PM

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

FWH 18.05/xHarbour 1.2.3/BCC7/Windows 10

FiveTech Support Forums

Continue the discussion