lGetBar

[Marcelo Roggeri]

Hola buenas noches,

Code: Select all  Expand view

               *-----------------------------------------------------------
                // BARRA DE BUSQUEDA
                oBrwArt:lGetBar                := .T.
                oBrwArt:nGetBarHeight          := 32

                oBrwArt:aCols[1]:uBarGetVal    := Space(13)
                oBrwArt:aCols[1]:cBarGetBmp    := "BB_SEARCH(30x30)"
                oBrwArt:aCols[1]:bBarGetAction := {||  SetFilterRegistro(oQryArt,oBrwArt) }
                oBrwArt:aCols[1]:bBarGetValid  := {|x| SetFilterRegistro(oQryArt,oBrwArt), .T.}

                oBrwArt:aCols[2]:uBarGetVal    := Space(50)
                oBrwArt:aCols[2]:cBarGetBmp    := "BB_SEARCH(30x30)"
                oBrwArt:aCols[2]:bBarGetAction := {||  SetFilterRegistro(oQryArt,oBrwArt) }
                oBrwArt:aCols[2]:bBarGetValid  := {|x| SetFilterRegistro(oQryArt,oBrwArt), .T.}

                oBrwArt:bClrEdits              := { || { CLR_BLACK,rgb(255,250,240) } }
                // BARRA DE BUSQUEDA

ACTIVATE DIALOG oDlgSel CENTERED ON INIT oBrwArt:aCols[1]:oBarGet:SetFocus()

Necesito que el foco se posicione en el buscador de la columna 1
Lo he hecho en ventanas pero en el dialogo no lo hace, tal vez me falte algo
Agradezco cualquier ayuda.
Gracias y Saludos
Marcelo

[albeiroval]

+1

[albeiroval]

Marcelo pudiste resolver lo del foco en el getbar ?

[AngelSalom]

Prueba con :

Code: Select all  Expand view

ACTIVATE DIALOG oDlgSel CENTERED ON PAINT (SysRefresh(), oBrwArt:aCols[1]:oBarGet:SetFocus())
 

[Marcelo Roggeri]

Hola Angel buenos días, gracias por responder.
Efectivamente asi funciona como esperaba.
Saludos desde Argentina
Marcelo