1. This site uses cookies. By continuing to use this site, you are agreeing to our use of cookies. Learn More.

  2. Anuncie Aqui ! Entre em contato fdantas@4each.com.br

[RESOLVIDO] upc

Discussão em 'EMS , HCM e Totvs 11' iniciado por Will, Setembro 4, 2009.

Status do Tópico:
Não esta aberto para novas mensagens.
  1. Will

    Will Membro Participativo

    pessoal, gostaria de saber como faço para desabilitar um botao especifico da tela

    define input param p-ind-event as char no-undo.
    define input param p-ind-object as char no-undo.
    define input param p-wgh-object as handle no-undo.
    define input param p-wgh-frame as widget-handle no-undo.
    define input param p-cod-table as char no-undo.
    define input param p-row-table as rowid no-undo.

    def var h_frame as widget-handle no-undo.
    def var h_page as widget-handle no-undo.
    def var c-char as char no-undo.
    def var c-objeto as char no-undo.
    def var wh-objeto as handle no-undo.
    /* and p-ind-object = "VIEWER" */
    IF p-ind-Event = "INITIALIZE" then do:
    assign wh-objeto = p-wgh-frame:first-child.
    do while valid-handle(wh-objeto):

    case wh-objeto:name:
    when "tp-requis" then do:
    message "teste" view-as alert-box.
    assign wh-objeto:sensitive = no.
    end.
    end case.

    if wh-objeto:TYPE = 'field-group' then
    assign wh-objeto = wh-objeto:first-child.
    else
    assign wh-objeto = wh-objeto:next-sibling.

    END.
    end.
  2. alexfowler

    alexfowler Membro Participativo

    Pega o handle do botao e depois variavelhandledobotao:enable = false (ou sensitive), no evento de initialize.

    Pode acontecer que dependendo do evento depois executado na tela, o proprio programa datasul ative o botao, entao voce vai ter que pegar cada evento e desabilitar (nao sei se fazendo com o enable, como falei primeiro resolve isso).
Status do Tópico:
Não esta aberto para novas mensagens.

Compartilhe esta Página