FiveTech Software tech support forums

... can I use besides ActiveX to get around this issue? Here is my code. FUNCTION HPCall( cTransactionSetupID, oDlg ) local oWndHP, oActiveX local cEvents := "" LOCAL cHtml := "" LOCAL oIcon DEFINE ICON oIcon RESOURCE "MYICON" DEFINE WINDOW oWndHP ; FROM 1, 5 TO 40, ...

Karinha, #include "FiveWin.ch" #define HKEY_LOCAL_MACHINE 2147483650 function Main() local oWnd, oWndChild, oActiveX local cEvents := "" INTER_APP_WEB_CONFIG("jsp.exe",11000) DEFINE WINDOW oWnd TITLE "Support" MDI DEFINE WINDOW oWndChild MDICHILD OF ...

... NAVEGADOR. Alguem têm alguma ideia de como resolver? PRG: #include "FiveWin.ch" function Main() local oWnd, oWndChild, oActiveX local cEvents := "" DEFINE WINDOW oWnd TITLE "FiveWin ActiveX Support" MDI DEFINE WINDOW oWndChild MDICHILD OF oWnd oActiveX = TActiveX():New( ...

Cambia el MemoEdit por ( MsgAlert( cEvents ), .t. )

Saludos,

Adhemar

Te anexo el ejemplo pero no me manda ningun error solo se cierra la aplicaicon. function Verejemplo() local oWnd, oActiveX local cEvents := "" DEFINE WINDOW oWnd TITLE "FiveWin ActiveX Support" oActiveX = TActiveX():New( oWnd, "Shell.Explorer" ) oWnd:oClient ...

... it freezes when running the application. Basically it turn explorer: #include "FiveWin.ch" function Main() local oWnd, oActiveX local cEvents := "" DEFINE WINDOW oWnd TITLE "FiveWin ActiveX Support" oActiveX = TActiveX():New( oWnd, "Shell.Explorer" ) oWnd:oClient ...

... se queda colgada la aplicacion. Basicamente es activar explorer: #include "FiveWin.ch" function Main() local oWnd, oActiveX local cEvents := "" DEFINE WINDOW oWnd TITLE "FiveWin ActiveX Support" oActiveX = TActiveX():New( oWnd, "Shell.Explorer" ) oWnd:oClient ...

Tienes un ejemplo en \samples\webexp.prg Entiendo que es lo que buscas #include "FiveWin.ch" function Main() local oWnd, oActiveX local cEvents := "" DEFINE WINDOW oWnd TITLE "FiveWin ActiveX Support" oActiveX = TActiveX():New( oWnd, "Shell.Explorer" ) oWnd:oClient ...

Ronaldo,

Probably nRow and nCol are placed inside aParams.

Please, click on the activex and post here the cEvents content.

Preciso saber da LINHA e COLUNA, para criar meu proprio MENU POP... look: oActiveX:bOnEvent = { | event, aParams, pParams | cEvents += EventInfo( event, aParams, pParams, oActiveX ) } i need: oActiveX:bOnEvent = { | event, aParams, pParams, nRow, nCol | cEvents += EventInfo( ...

... Xbase++". #xtranslate LL_PROJECT_LIST => 2 #include "FiveWin.ch" #include "cmbtll12.ch" Global oActiveX, oWnd, hJob, nRet Function Main() Local cEvents := "" LOCAL aField, aType, aLen, aDec, sName LOCAL FldType, FldContent, DateBuffer, lExpr, I:=1, bAsField:=.T. USE ARTICLE NEW GO TOP aField ...

... Xbase++" se encuentra cmbtll12.ch #include "FiveWin.ch" #include "cmbtll12.ch" Global oActiveX, oWnd, hJob, nRet Function Main() Local cEvents := "" LOCAL aField, aType, aLen, aDec, sName LOCAL FldType, FldContent, DateBuffer, lExpr, I:=1, bAsField:=.T. USE ARTICLE NEW GO TOP aField ...

... but at one point I have no clue how to proceed. Please review the code below. Regards, Stephan FUNCTION GIS() LOCAL oWnd, oWndChild, oMap LOCAL cEvents := "" LOCAL oLayer, hLayers, nLayers LOCAL hItem DEFINE WINDOW oWndChild MDICHILD OF oWndMain() oMap = TActiveX():New(oWndChild, "MapObjectsLT2.Map.1") ...

... surface oMapPoint:Do("NewMap", 1) // Generates an error on this line. If I comment out the window opens oMapPoint:bOnEvent = { | event, aParams | cEvents += EventInfo( event, aParams ) } ACTIVATE WINDOW oWndMap ; ON INIT ( oWndMap:Move(0,0,640,390,.t.) ) ; ON PAINT oWndMap:SetFocus() ; VALID ( ...

... I received your email with the updated libs. When I try to set the the event block I get an error on: oMapPoint:bOnEvent = { | event, aParams | cEvents += EventInfo( event, aParams ) } This line generates the error: Error MapPoint.Control/16389 E_FAIL: _BONEVENT I also tried replacing the ActiveX ...