objeto:SENSITIVE

Discussão em 'Comandos Básicos' iniciado por fdantas, Fevereiro 3, 2009.

  1. fdantas

    fdantas Administrator Moderador

    /******************** STATEMENTS**********************************
    **
    ** objeto:SENSITIVE (Attribute)
    ** E um atributo responsabel pela sen-
    ** sibilidade de uma widget, quanto ao
    ** input-focus.
    **
    **********************************************************************/

    Código:
    DEFINE BUTTON bt-fim LABEL "&Fim". 
DEFINE BUTTON bt-01 LABEL "&01". 
DEFINE BUTTON bt-02 LABEL "&02". 
DEFINE BUTTON bt-03 LABEL "&03".   
DEFINE BUTTON bt-04 LABEL "&04".   

DEFINE FRAME f-tela
       bt-01    AT ROW  04 COLUMN 05
       bt-02    AT ROW  04 COLUMN 11
       bt-03    AT ROW  04 COLUMN 17
       bt-04    AT ROW  04 COLUMN 23
       bt-fim   AT ROW  04 COLUMN 29
       WITH TITLE "FRAME MAE" 
       SIZE 40 BY 10 CENTERED ROW 4.

DISPLAY bt-01
        bt-02
        bt-03 
        WITH FRAME f-tela.

ENABLE ALL WITH FRAME f-tela.  

ON CHOOSE OF bt-01
   DO:  
      bt-01:SENSITIVE = NO.
      bt-02:SENSITIVE = NO.
      bt-03:SENSITIVE = NO.
      bt-04:SENSITIVE = NO.
   END.

WAIT-FOR CHOOSE OF BT-FIM.
    fdantas, Fevereiro 3, 2009
    #1

Compartilhe esta Página