import.css=/download/attachments/6062824/tecnologia.css |
Cria uma janela de diálogo, no programa, para entrada de dados não modal. Desta forma, é permitido que outras janelas recebam dados enquanto esta estiver ativa.
#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
|
Advanced Protheus 6.09, Advanced Protheus 7.10, Microsiga Protheus 8.11, Protheus 10, TOTVS Application Server 10, TOTVS Application Server 11