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

Assinalando combo-box

Discussão em 'Progress 4GL' iniciado por guilherme_angus, Agosto 11, 2010.

  1. guilherme_angus

    guilherme_angus Sem Pontuação

    Eaii galera!

    Como sou novo na linguagem, ás vezes surge essas dúvidas principiantes! Tenho um programa de consulta, para o usuario digitar os parâmetros de consulta ele clica em um botão que abre outro programa com os paramestros da pesquisa. Nesse programa há um combo-box com a área que o usuário quer pesquisar.

    Gostaria de saber se tem um jeito de quando for usuário X assinala o com-box de um jeito, quando for o usuário Y de outro jeito, se não for nenhum assinala Z.

    Obrigado!
  2. LeandroSantos

    LeandroSantos Membro Participativo

    Voce pode fazer assim:

    No seu programa de Login:
    Código:
    def new shared var segue-usuario as char.
    ....
    ....
    ....
    assign
        segue-usuario = _user._userid.
    
    No programa onde voce precisa verificar qual é o usuário:
    Código:
    def shared var segue-usuario as char.
    ...
    ...
    ...
    case segue-ususario:
        when "Fulano" then vcombo:screen-value = "abcd".
        when "Siclano" then vcombo:screen-value = "efgh".
        otherwise vcombo:screen-value = "ijkl".
    end case.
    
  3. guilherme_angus

    guilherme_angus Sem Pontuação

    Deu certo!

    Valeeu Leandro!

Compartilhe esta Página