Exibir origem

import.css=/download/attachments/6062824/tecnologia.css

Cria uma janela de diálogo, no programa, para entrada de dados do tipo modal. Desta forma, não é permitido que outras janelas recebam dados enquanto esta estiver ativa..

Hierarquia

TWindow
- TDialog

Construtores

Propriedades

Métodos

Observações

Recomendamos a utilização da classe MsDialog que é herdada desta classe.
Os métodos windowState() e hasFocus(), bem como as propriedades bWindowState e bfocusChange, estão disponíveis somente em builds superiores a 7.00.101202A.

Exemplos

  #include "TOTVS.CH"
  User Function TDialog()  
   // cria diálogo 
   Local oDlg := TDialog():New(180,180,550,700,'Exemplo TDialog',,,,,CLR_BLACK,CLR_WHITE,,,.T.) 
   // ativa diálogo centralizado 
   oDlg:Activate(,,,.T.,{||msgstop('validou!'),.T.},,{||msgstop('iniciando')} )
  Return

Exemplo da classe TDialog

Abrangência

Advanced Protheus 6.09, Advanced Protheus 7.10, Microsiga Protheus 8.11, Protheus 10, TOTVS Application Server 10, TOTVS Application Server 11