Hello All,
Has anybody used third party ActiveX control with FWH application ? I need help to use the same. I need to send the control (ocx) file to private mail as it is little bigger and cannot be post here.
Expecting kind co-operation,
Milan.
FiveTech Support Forums
FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Third party ActiveX control users
Milan,
Please upload it to www.hyperupload.com and post here the download url they provide you. Thanks.
Hello Antonio,
This is the link
http://hyperupload.com/download/3eed9f9 ... l.zip.html
It contains the activex control (demo version) along with its documentation. Any help would be highly appreciated.
TIA
Milan.
Milan,
Here you have a working sample using that ActiveX. Remember you have to do a regsvr32.exe GSN.ocx to register it in your computer, before using it. Also, you may register it from your application (do a search on these forums for regsvr*)
Here you have a working sample using that ActiveX. Remember you have to do a regsvr32.exe GSN.ocx to register it in your computer, before using it. Also, you may register it from your application (do a search on these forums for regsvr*)
#include "FiveWin.ch"
function Main()
local oWnd, oActiveX
local cEvents := ""
DEFINE WINDOW oWnd TITLE "FiveWin ActiveX Support"
oActiveX = TActiveX():New( oWnd, "GSN.GSNCtrl.1" )
oActiveX:nWidth = 0
oActiveX:nHeight = 0
oActiveX:bOnEvent = { | event, aParams | cEvents += EventInfo( event, aParams ) }
@ 3, 3 BUTTON "About" ACTION oActiveX:Do( "AboutBox" ) SIZE 80, 25
ACTIVATE WINDOW oWnd ;
VALID ( MemoEdit( cEvents ), .t. )
return nil
function EventInfo( event, aParams )
local cMsg := "Event: " + cValToChar( event ) + CRLF
local n
cMsg += "Params: "
for n = 1 to Len( aParams )
cMsg += cValToChar( aParams[ n ] ) + CRLF
next
return cMsg + CRLFDear Antonio,
Greattttt ! Now I am lot more hopeful about the possibilities.
But in the working sample of yours I get following error. Mine is Nov-2005 buid of FWH.
Error description: Error BASE/1005 Message not found: TACTIVEX:_BONEVENT
Stack Calls
Called from: => TACTIVEX:ERROR(175)
Called from: tobject.prg => (b)HBOBJECT:HBOBJECT(105)
Called from: => TACTIVEX:MSGNOTFOUND(0)
Called from: ACTIVEX.PRG => TACTIVEX:_BONEVENT(167)
Called from: R.PRG => MAIN(14)
Eagerly awaiting your reply.
Milan.
Event supporting is included at March 2006 release
Milan Mehta wrote:Dear Antonio,
Greattttt ! Now I am lot more hopeful about the possibilities.
But in the working sample of yours I get following error. Mine is Nov-2005 buid of FWH.
Error description: Error BASE/1005 Message not found: TACTIVEX:_BONEVENT
Stack Calls
===========
Called from: => TACTIVEX:ERROR(175)
Called from: tobject.prg => (b)HBOBJECT:HBOBJECT(105)
Called from: => TACTIVEX:MSGNOTFOUND(0)
Called from: ACTIVEX.PRG => TACTIVEX:_BONEVENT(167)
Called from: R.PRG => MAIN(14)
Eagerly awaiting your reply.
Milan.
Milan,
With the FWH that you are using, please comment this line:
// oActiveX:bOnEvent = { | event, aParams | cEvents += EventInfo( event, aParams ) }
Dear Antonio,
Ok. What are the advantages of Mar-2006 release as regards ActiveX control ? Will it be beneficial to me t buy that one ?
TIA
Milan.
Milan,
FWH march build has support for ActiveX events management. If you need to manage ActiveX events, then you need the march build.
Dear Antonio,
I do want to use the methods of the class (and also property). Will I need March build for that ?
Just guide me further.
TIA
Milan.
I do want to use the methods of the class (and also property). Will I need March build for that ?
Just guide me further.
TIA
Milan.
Antonio Linares wrote:Milan,
FWH march build has support for ActiveX events management. If you need to manage ActiveX events, then you need the march build.
march build is needed to manage events. For properties and methods, january-february build is ok.