Estimados;
Tengo un TExploreBar con 2 paneles. TExploreBar se despliega en la ventana izquierda de un Splitter
En el primero de los paneles se abre un xBrowse. El codigo es el siguiente:
El problema es que no responde a los clic de mouse. Como tampoco, la barra de indicadora toma el color declarado: :bClrSelFocus:= {|| {CLR_AMARILLO,CLR_MUSGODARK} }
Alguna idea de lo que puede estar ocurriendo?
desde ya muchas gracias
Tengo un TExploreBar con 2 paneles. TExploreBar se despliega en la ventana izquierda de un Splitter
En el primero de los paneles se abre un xBrowse. El codigo es el siguiente:
// Barra Tipo Outlook
DEFINE OUTLOOK2010 ::aoMn[_OL2003] OF h0:oWnd ;
PROMPTS "Control", "Mantenimiento", "" ;
BITMAPS "bmp_", "bmp_"
// Control de Insumos
@ 0, 0 EXPLORERBAR ::aoMn[_ExpBar1] OF ::aoMn[_OL2003]:aDialogs[ 1 ] ;
SIZE 195, 100
// Brw Obras
oQryOb:= oConx:SelectObras()
@ 3, 2 XBROWSE oBrwOb COLUMNS "desc_obra" OBJECT oQryOb OF ::aoMn[_OL2003]:aDialogs[1] AUTOSORT PIXEL SIZE 183, 250
WITH Object oBrwOb:desc_obra
:cHeader:= "Descripcion"
END
WITH Object oBrwOb
:lHScroll:= FALSE
:l2007 := TRUE
:bClrSelFocus:= {|| {CLR_AMARILLO,CLR_MUSGODARK} }
:CreateFromCode()
END
// Salir
@ 360, 40 BTNBMP PROMPT "Salir" OF ::aoMn[_OL2003]:aDialogs[1] SIZE 100, 30 CENTER NOBORDER 2007 ;
ACTION oConx:Desconectar()
// Barra Manten.
@ 0, 0 EXPLORERBAR ::aoMn[_ExpBar2] OF ::aoMn[_OL2003]:aDialogs[2] ;
SIZE 195, 100 // Ancho 195 = ::aoMn[_OL2003]:aDialogs[2]:nWidth+...
...
SetParent( ::aoMn[_OL2003]:hWnd, h0:oWnd:hWnd )
DEFINE STATUSBAR ::aoMn[_StatusB] PROMPT " Control de Insumos en Obras" OF h0:oWnd
// Splitter
oDlgImp:= nil
@ 0, ::aoMn[_OL2003]:aDialogs[ 1 ]:nWidth+2 ;
SPLITTER ::aoMn[_Split] ;
VERTICAL _3DLOOK ;
PREVIOUS CONTROLS ::aoMn[_OL2003] ;
HINDS CONTROLS oDlgImp ;
SIZE 2, h0:oWnd:nHeight - 10 PIXEL ;
OF h0:oWnd
::aoMn[_Split]:lStatic:= TRUE // Inmobiliza Splitter
SetParent( ::aoMn[_Split]:hWnd, h0:oWnd:hWnd )
oBrwOb:SetFocus()El problema es que no responde a los clic de mouse. Como tampoco, la barra de indicadora toma el color declarado: :bClrSelFocus:= {|| {CLR_AMARILLO,CLR_MUSGODARK} }
Alguna idea de lo que puede estar ocurriendo?
desde ya muchas gracias
Resistencia - "Ciudad de las Esculturas"
Chaco - Argentina
Chaco - Argentina