Histórico da Página
Composition Setup |
---|
import.css=/download/attachments/3279126062824/newLayouttecnologia.css |
|
Pagetitle |
---|
...
|
...
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
New
Método construtor da classe.
tDialog(): New ( [ nTop], [ nLeft], [ nBottom], [ nRight], [ cCaption], [ uParam6], [ uParam7], [ uParam8], [ uParam9], [ nClrText], [ nClrBack], [ uParam12], [ oWnd], [ lPixel], [ uParam15], [ uParam16], [ uParam17], [ nWidth], [ nHeight] ) --> oObjeto
...
- oObjeto()
- Retorna o objeto criado.
Activate
Apresenta o diálogo.
tDialog(): Activate ( [ uParam1], [ uParam2], [ uParam3], [ lCentered], [ bValid], [ uParam6], [ bInit], [ uParam8], [ uParam9] ) -->
...
Inclusão de trecho | ||||||
---|---|---|---|---|---|---|
|
Propriedades
Inclusão de trecho | ||||||
---|---|---|---|---|---|---|
|
Métodos
Inclusão de trecho | ||||||
---|---|---|---|---|---|---|
|
Observações
...
oDlg:Activate(,,,.T.,{||msgstop('validou!'),.T.},,{||msgstop('iniciando…')} )
End
Finaliza o diálogo.
tDialog(): End ( ) --> lRet
- lRet(logico)
- Retorna verdadeiro (.T.) se finalizar o diálogo; caso contrário, retorna falso (.F.).
oDlg:End()
hasFocus
Indica se o componente esta em foco.
tDialog(): hasFocus ( ) --> lFocus
- lFocus(logico)
- Retorna, verdadeiro (.T.), se o componente está em foco; caso contrário, falso (.F.).
LOCAL focus := oDialog:hasFocus()
windowState
Indica o estado atual do componente.
tDialog(): windowState ( ) --> nState
- nState()
- Retorna um número inteiro indicando o estado atual do componente. Sendo: 0=Restaurado, 1=Minimizado e 2=Maximizado.
LOCAL state := oDialog:windowState()
Propriedade | Descrição | Tipo |
bFocusChange | Indica se o componente esta ou não em foco. Para mais informações desta propriedade, consulte a área Observações. | Bloco de código |
bWindowState | Indica o estado atual do componente (0 = restaurado, 1 = Minizado e 2 = Maximizado). Para mais informações desta propriedade, consulte a área Observações. | Bloco de código |
nResult | Indica como a classe tDialog foi finalizada. Se 0, foi finalizada pelo método End() ou 2, foi finalizada através do botão fechar. | Numérico |
...
- 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
Bloco de código | |||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|
| Descrição
| ||||||||||
| |||||||||||
o | Indica a instância do objeto TDialog. | ||||||||||
State | Indica o estado atual do componente. Sendo: 0 = restaurado, 1 = Minimizado e 2 = Maximizado. |
Parâmetro | Descrição |
---|---|
o | Indica a instância do objeto TDialog. |
focus | Indica se o componenten está em foco (.T.) ou sem foco (.F.). |
oDialog:bFocusChange := {|o,focus| showFocus(focus)}
#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…
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