Histórico da Página
| Composition Setup |
|---|
import.css=/download/attachments/3279126062824/newLayouttecnologia.css |
| Portuguese |
| 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
| Nome | Tipo | Descrição | Obrigatório | Referência |
| nTop | Numérico | Indica a coordenada vertical superior em pixels ou caracteres. | ||
| nLeft | Numérico | Indica a coordenada horizontal esquerda em pixels ou caracteres. | ||
| nBottom | Numérico | Indica a coordenada vertical inferior em pixels ou caracteres. | ||
| nRight | Numérico | Indica a coordenada horizontal direita em pixels ou caracteres. | ||
| cCaption | Caracter | Indica o título da janela. | ||
| uParam6 | Qualquer | Compatibilidade. | ||
| uParam7 | Qualquer | Compatibilidade. | ||
| uParam8 | Qualquer | Compatibilidade. | ||
| uParam9 | Qualquer | Compatibilidade. | ||
| nClrText | Numérico | Indica a cor do texto. | ||
| nClrBack | Numérico | Indica a cor de fundo. | ||
| uParam12 | Qualquer | Compatibilidade. | ||
| oWnd | Objeto | Indica a janela mãe (principal) da janela que será criada. O padrão é a janela principal do programa. | ||
| lPixel | Lógico | Indica se considera as coordenadas passadas em pixels (.T.) ou caracteres (.F.). | ||
| uParam15 | Qualquer | Compatibilidade. | ||
| uParam16 | Qualquer | Compatibilidade. | ||
| uParam17 | Qualquer | Compatibilidade. | ||
| nWidth | Numérico | Indica a largura da janela em pixels. | ||
| nHeight | Numérico | Indica a altura da janela em pixels. | ||
| lTransparent | Lógico | Se .T. permitira que a Dialog recebe um fundo transparente. |
oObjeto
- ()
- Retorna o objeto criado.
Activate
Apresenta o diálogo.
tDialog(): Activate ( [ uParam1], [ uParam2], [ uParam3], [ lCentered], [ bValid], [ uParam6], [ bInit], [ uParam8], [ uParam9] ) -->
| Nome | Tipo | Descrição | Obrigatório | Referência |
| uParam1 | Qualquer | Compatibilidade. | ||
| uParam2 | Qualquer | Compatibilidade. | ||
| uParam3 | Qualquer | Compatibilidade. | ||
| lCentered | Lógico | Indica se a janela será (.T.) ou não (.F.) centralizada. O padrão é falso (.F.). | ||
| bValid | Bloco de código | Indica se o conteúdo do diálogo é válido. Se o retorno for falso (.F.), o diálogo não será fechado quando a finalização for solicitada. | ||
| uParam6 | Qualquer | Compatibilidade. | ||
| bInit | Bloco de código | Indica o bloco de código que será executado quando o diálogo iniciar a exibição. | ||
| uParam8 | Qualquer | Compatibilidade. | ||
| uParam9 | Qualquer | Compatibilidade. |
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
| Inclusão de trecho | ||||||
|---|---|---|---|---|---|---|
|
Propriedades
| Inclusão de trecho | ||||||
|---|---|---|---|---|---|---|
|
Métodos
| Inclusão de trecho | ||||||
|---|---|---|---|---|---|---|
|
Observações
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 ')} )
ReturnPreview
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
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas