setDialogEsc( lOnlOff ) FWH8.08

setDialogEsc( lOnlOff ) FWH8.08

Postby Daniel Garcia-Gil » Sun Sep 14, 2008 2: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 )
User avatar
Daniel Garcia-Gil
 
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 pm
Location: Isla de Margarita

Postby karinha » Mon Sep 15, 2008 2:26 pm

Puedes hacer asi,

STATIC lSalida := .F.

Code: Select all  Expand view  RUN
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
User avatar
karinha
 
Posts: 7860
Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil

Postby Daniel Garcia-Gil » 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...
User avatar
Daniel Garcia-Gil
 
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 pm
Location: Isla de Margarita


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 81 guests