FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour addButton puede contener un atajo?
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
addButton puede contener un atajo?
Posted: Sat Sep 26, 2020 08:17 PM

HOLA.
puede contener un atajo el addButton? como ser VK_F5?
como?

GRACIAS

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: addButton puede contener un atajo?
Posted: Sun Sep 27, 2020 12:39 PM
No te sirve SETKEY()?

Code (fw): Select all Collapse
   SETKEY( VK_F5, { | nKey | RELOGIO()  } )
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
Re: addButton puede contener un atajo?
Posted: Sun Sep 27, 2020 05:59 PM

nunca lo habia usado, ya que al definirlo se me ejecuta en todas las ventanas, o estoy haciendolo mal?
gracias.

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 514
Joined: Sun Oct 16, 2005 03:32 AM
Re: addButton puede contener un atajo?
Posted: Sun Sep 27, 2020 06:31 PM
Al comienzo del procedure/function donde necesitas el atajo colocas
Code (fw): Select all Collapse
SETKEY( VK_F5, { | nKey | RELOGIO()  } )

También lo puede hacer en el ON INIT del Dialog

Y al final de mismo procedure/function
Code (fw): Select all Collapse
SETKEY( VK_F5, { | nKey | NIL  } )

Si lo invocaste en el ON INIT del Dialog entonces en el VALID del mismo, lo dejas en NIL

Saludos,



Carlos Gallego



*** FWH-25.12, xHarbour 1.3.1 Build 20241008, Borland C++7.70, PellesC, ADS 11.1***

Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
Re: addButton puede contener un atajo?
Posted: Mon Sep 28, 2020 09:25 AM
buen dia.

En mi caso ese atajo quiero asignarselo a un button de

Code (fw): Select all Collapse
WITH OBJECT oTb
      :addButton( { || ::contactos() }, "Manejo de datos de los contactos", "Contactos" )

y como esta definido en el modulo principal... cuando ingreso al modulo que se ejecuta "::contactos()" sigue estando habilitado,
voy a probar de deshabilitarlo al entrar al modulo, y les comento como quedo.

gracias.
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
Re: addButton puede contener un atajo?
Posted: Mon Sep 28, 2020 09:28 AM

Asi es, funciona.
entro al modulo y lo deshabilito al salir lo habilito nuevmente.
es un trabajo medio tedioso pero funciona.

gracias.-

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: addButton puede contener un atajo?
Posted: Mon Sep 28, 2020 10:25 AM
goosfancito wrote:Asi es, funciona.
entro al modulo y lo deshabilito al salir lo habilito nuevmente.
es un trabajo medio tedioso pero funciona.


gracias.-


Mi amigo, programar, debería ser un placer, no un deber.

Saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

Continue the discussion