FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour setDialogEsc( lOnlOff ) FWH8.08
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 PM
setDialogEsc( lOnlOff ) FWH8.08
Posted: Sun Sep 14, 2008 02:22 PM

setDialogEsc( lOnlOff )
no me funciona esta funcion, siempre se cierran los dialogos al presionar ESC, tengo FWH 8.08
la seteo en ON o OFF (.t. o .f.) y la coloco al principio de mi aplicacion, nunca hace nada, la he colocado en varias partes del sistema y nada, lo que me quedo fue colocarla en el bolsillo y olvidarme de ella (por ahora)
he tenido que optar por colocar los valid en cada dialog
VALID !GETKEYSTATE( VK_ESCAPE )

Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
setDialogEsc( lOnlOff ) FWH8.08
Posted: Mon Sep 15, 2008 02:26 PM
Puedes hacer asi,

STATIC lSalida := .F.

REDEFINE BUTTON oBtn OF oDlg ;
                ACTION( lSalida := .T.,  oDlg:End() )

ACTIVATE DIALOG odlg CENTERED ;
        VALID( lSalida )
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 PM
setDialogEsc( lOnlOff ) FWH8.08
Posted: Mon Sep 15, 2008 10:02 PM

gracias karinha, es muy buena idea tambien, pero lo ideal seria que aprovechando la utilidad de dicha funcion no tengas que hacer el VALID en todos los dialogos...

Continue the discussion