Hola,
Estoy tratando de integrar los componentes de "Codejock Bar" usando el siguiente codigo (encontrado en el foro):
Al inicio el programa ejecuta correctamente y presenta el mensaje de que estoy usndo el ActiveX (Trial version) de Codejock, pero despues solo presenta una franja negra en lugar del Ribbonbar.
Estoy usando Harbour de Agosto 2013 + FWH 13.08.
Alguna sugerencia?
Gracias,
George
Estoy tratando de integrar los componentes de "Codejock Bar" usando el siguiente codigo (encontrado en el foro):
function Main()
 PUBLIC oWnd, oAct, oRb, oTabFiles, oTabEdit, oTabBuild
 DEFINE WINDOW oWnd
 @ 0, 0 ACTIVEX oAct PROGID "Codejock.CommandBarsFrame.16.2.6" OF oWnd
 oAct:Do( "AttachToWindow", oWnd:hWnd )
 oRb = oAct:Do( "AddRibbonBar", "fwh" )
 oTabFiles = oRb:InsertTab( 0, "&Files" )
 oTabEdit  = oRb:InsertTab( 1, "&Edit" )
 oTabBuild = oRb:InsertTab( 2, "&Build" )
 oTabFiles:Groups:AddGroup( "Test 1", 0 )
 oTabFiles:Groups:AddGroup( "Test 2", 1 )
 ACTIVATE WINDOW oWnd
return nilAl inicio el programa ejecuta correctamente y presenta el mensaje de que estoy usndo el ActiveX (Trial version) de Codejock, pero despues solo presenta una franja negra en lugar del Ribbonbar.
Estoy usando Harbour de Agosto 2013 + FWH 13.08.
Alguna sugerencia?
Gracias,
George