Cross Segmento - TOTVS Backoffice Linha Protheus - ADVPL - Alterar tamanho da tela na classe FwMarkBrowse

Tempo aproximado para leitura: 00:01:00 min

Ocorrência
Quais são as funções de criptografia existentes no Protheus?

Ambiente
Cross Segmento - TOTVS Backoffice (Linha Protheus) - ADVPL - Todas as versões

Solução

Pela classe FwMarkBrowse não existe este controle de tamanho da tela. Agora pode-se criar a FwMarkBrowse em uma MsDialog ou TDialog, irá conseguir redimensionar.

Exemplo:

#include "protheus.ch"

#include "fwmvcdef.ch"


function u_tstFwMarkDlg()

            private oMark
           private oDlg
           private aRotina := menuDef()


           oDlg := msDialog():new(180,180,550,700,'Browse Mark com Dialog',,,,,CLR_BLACK,CLR_WHITE,,,.T.)

            oMark := fwMarkBrowse():new()
          oMark:setOwner(oDlg)
        oMark:setAlias('SA1')
            oMark:setDescription('Alunos')
        oMark:setFieldMark( 'A1_OK' )
     oMark:setSeeAll(.T.) 
            oMark:activate()

            // Ativa diálogo centralizado

         oDlg:activate(,,,.t.,{||,.t.},,{||})
return
static function menuDef()

            local aRotina := {}
            ADD OPTION aRotina TITLE 'Visualizar' ACTION 'função de usuário' OPERATION 2 ACCESS 0
           ADD OPTION aRotina TITLE 'Processar' ACTION 'função de usuário' OPERATION 2 ACCESS 0

return aRotina

Saiba Mais

MsDialog

TDialog

FwMarkBrowse