TOTVSTEC

Árvore de páginas

Versões comparadas

Versão antiga 3

changes.mady.by.user Usuário desconhecido (mferreira)

Gravado em

comparado com

Nova versão 4

changes.mady.by.user Ricardo Mansano Godoi

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Portuguese

Pagetitle
MsDialog
MsDialog

Classe: MsDialog

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

TSrvObject -> tWindow -> tDialog -> MSDialog

 

 


Construtores
New

New

Método construtor da classe.


Sintaxe

MsDialog(): New ( [ nTop], [ nLeft], [ nBottom], [ nRight], [ cCaption], [ uParam6], [ uParam7], [ uParam8], [ uParam9], [ nClrText], [ nClrBack], [ uParam12], [ oWnd], [ lPixel], [ uParam15], [ uParam16], [ uParam17], [ uParam18], [ uParam19] ) --> oObjeto


Parâmetros

 

Compatibilidade.
NomeTipoDescriçãoObrigatórioReferência
nTopNuméricoIndica a coordenada vertical superior em pixels ou caracteres.  
nLeftNuméricoIndica a coordenada horizontal esquerda em pixels ou caracteres.  
nBottomNuméricoIndica a coordenada vertical inferior em pixels ou caracteres.  
nRightNuméricoIndica a coordenada horizontal direita em pixels ou caracteres.  
cCaptionCaracterIndica o título da janela.  
uParam6CaracterCompatibilidade.  
uParam7NuméricoCompatibilidade.  
uParam8LógicoCompatibilidade.  
uParam9QualquerCompatibilidade.  
nClrTextNuméricoIndica a cor do texto.  
nClrBackNuméricoIndica a cor de fundo.  
uParam12ObjetoCompatibilidade.  
oWndObjetoIndica a janela mãe (principal) da janela que será criada. O padrão é a janela principal do programa.  
lPixelLógicoIndica se considera as coordenadas passadas em pixels (.T.) ou caracteres (.F.).  
uParam15QualquerCompatibilidade.  
uParam16QualquerCompatibilidade.  
uParam17QualquerCompatibilidade.  
uParam18lTransparentArray of RecordCompatibilidade.
uParam19Array of Record
LógicoSe .T. permitira que a Dialog recebe um fundo transparente.  

 

Retorno
oObjeto
    ()
  • Retorna o objeto criado.

Exemplos
oDlg := MSDialog():New(180,180,550,700,'Exemplo MSDialog',,,,,CLR_BLACK,CLR_WHITE,,,.T.)

Observações

 

 


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

Preview
Exemplo da classe MSDialog

Abrangência
Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10