Duvida Label dinâmico em browser

Discussão em 'Progress 4GL' iniciado por brunoowr, Março 18, 2015.

  1. brunoowr

    brunoowr Membro Participativo

    Olá pessoal, estou precisando alterar os labels das colunas de um browse dinâmicamente, depois que o browse já foi criado. Dei uma pesquisada e achei mais gente com a mesma dúvida mas sem solução. Alguém pode me ajudar?
    brunoowr, Março 18, 2015
    #1
  2. rafael.andrade

    rafael.andrade Membro Master Moderador Equipe de Suporte

    Faça assim:

    tabela.campo :LABEL IN BROWSE BRW-Browse = "NovoNome".

    Abraço

    Rafael
    rafael.andrade, Março 18, 2015
    #2
  3. brunoowr

    brunoowr Membro Participativo

    tinha achado esse exemplo em outro forum

    DEFINE VARIABLE iCol AS INTEGER NO-UNDO.
    DEFINE VARIABLE cSearchField AS CHARACTER NO-UNDO.

    /* Assuming search-field was "desc4" */
    ASSIGN
    cSearchField = "desc4".

    /* Go through all columns */
    DO iCol = 1 TO BROWSE brResults:NUM-COLUMNS.

    /* If column name matches serch*/
    IF BROWSE brResults:GET-BROWSE-COLUMN(iCol):NAME = cSearchField THEN DO:
    /* Set format & width */
    BROWSE brResults:GET-BROWSE-COLUMN(iCol):FORMAT = "X(16)".
    BROWSE brResults:GET-BROWSE-COLUMN(iCol):WIDTH = 25.
    END.

    END.

    mas o teu também funciona e poupa muitas linhas de código

    Muito obrigado!!
    brunoowr, Março 18, 2015
    #3

Compartilhe esta Página