FwDialogModal e MsDialog

Bom dia!

Estou com uma dúvida referente ao tamanho de telas usando a classe MsDialog e FwDialogModal.

Estou informando os mesmos valores em pixel para ambas as classes, e as telas estão sendo criadas com tamanho totalmente diferente. Segue exemplo:

comparacao_tamanhos.PNG

Código utilizado para obter esse resultado:

#INCLUDE 'TOTVS.CH'

User Function DLGTST
Local nDlg := 0

    nDlg := Aviso('Teste de Dialog','Selecione qual dialog deseja criar...',{'MsDialog','FwDialogModal','Sair'})

    If(nDlg == 1)

        fMsDialog()

    ElseIf(nDlg == 2)

        fDlgModal()

    EndIf

Return

Static Function fMsDialog
Local oDlg := Nil

    oDlg := MsDialog():New(000,000,400,400,'MsDialog',,,,,CLR_BLACK,CLR_WHITE,,,.T.)
    oDlg:Activate()

Return

Static Function fDlgModal
Local oDlg  := Nil

    oDlg  := FwDialogModal():New()       
    oDlg:SetEscClose(.T.)
    oDlg:SetTitle('FwDialogModal')

    //Seta a largura e altura da janela em pixel
    oDlg:SetPos(000, 000)
    oDlg:SetSize(400, 400)

    oDlg:CreateDialog()
    oDlg:AddCloseButton(Nil, 'Fechar')

    oDlg:Activate()

Return

Alguém já precisou utilizar a FwDialogModal? Saberia me explicar se está correta essa divergência?

Grato pela atenção!

compartilhar
  1. Você vai ver essas setas em qualquer página de pergunta. Com elas, você pode dizer se uma pergunta ou uma resposta foram relevantes ou não.
  2. Edite sua pergunta ou resposta caso queira alterar ou adicionar detalhes.
  3. Caso haja alguma dúvida sobre a pergunta, adicione um comentário. O espaço de respostas deve ser utilizado apenas para responder a pergunta.
  4. Se o autor da pergunta marcar uma resposta como solucionada, esta marca aparecerá.
  5. Clique aqui para mais detalhes sobre o funcionamento do TOTVS DevForum!

1 resposta

Não é a resposta que estava procurando? Procure outras perguntas com as tags advpl msdialog fwdialogmodal ou faça a sua própria pergunta.