FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour lGetBar
Posts: 344
Joined: Sat Jul 22, 2006 09:04 PM
lGetBar
Posted: Wed Jul 17, 2019 11:40 PM
Hola buenas noches,

Code (fw): Select all Collapse
                *-----------------------------------------------------------
                // 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
FWH - Harbour - BCC7 - PellesC
Posts: 400
Joined: Tue Oct 16, 2007 05:51 PM
Re: lGetBar
Posted: Thu Jul 18, 2019 01:53 PM

+1

Saludos,
Regards,

Albeiro Valencia
www.avcsistemas.com
Posts: 400
Joined: Tue Oct 16, 2007 05:51 PM
Re: lGetBar
Posted: Tue Jul 23, 2019 06:20 PM

Marcelo pudiste resolver lo del foco en el getbar ?

Saludos,
Regards,

Albeiro Valencia
www.avcsistemas.com
Posts: 728
Joined: Fri Oct 07, 2005 07:38 AM
Re: lGetBar
Posted: Tue Jul 23, 2019 07:56 PM
Prueba con :

Code (fw): Select all Collapse
ACTIVATE DIALOG oDlgSel CENTERED ON PAINT (SysRefresh(), oBrwArt:aCols[1]:oBarGet:SetFocus())
Angel Salom
Visionwin Software - https://www.visionwin.com
------------------------------------------------------------
fwh 19.05 - harbour 3.2 - bcc 7.4
Posts: 344
Joined: Sat Jul 22, 2006 09:04 PM
Re: lGetBar
Posted: Wed Jul 24, 2019 03:47 PM

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

FWH - Harbour - BCC7 - PellesC

Continue the discussion