Usando MessageBox

[mausimag 4]

Invés de usar a função messagedlg eh melhor usar a função MessageBox

 

Sintaxe:

MessageBox (Handle, Msg, Caption, Botoes)[/b]

 

Handle : Endereço do form na memória ; Sempre uso Application.Handle

Msg : A messagem a ser mostrada

Caption : O titulo da messagem

Botoes : Os Botoes que irao ser mostrados.

 

Botões:

MB_ABORTRETRYIGNORE A messagem mostra os tres botoes: Abort, Retry, and Ignore.

MB_OK A messagem mostra um botoao: OK. This is the default.

MB_OKCANCEL A messagem mostra os dois botoes: OK and Cancel.

MB_RETRYCANCEL A messagem mostra os dois botoes: Retry and Cancel.

MB_YESNO A messagem mostra os dois botoes: Yes and No.

MB_YESNOCANCEL A messagem mostra os tres botoes: Yes, No, and Cancel.[/b]

 

Sons:

MB_ICONEXCLAMATION, MB_ICONWARNING: Mostra o icone de exclamação e som.

MB_ICONINFORMATION

MB_ICONQUESTION

MB_ICONSTOP

MB_ICONERROR[/b]

 

Botão com focus

MB_DEFBUTTON1: Padrao nao precisa ser colocado

MB_DEFBUTTON2: Coloca o segundo botao

MB_DEFBUTTON3: Coloca o terceiro botao

MB_DEFBUTTON4: Coloca o quarto botao[/b]

 

Resposta:

IDABORT

IDCANCEL

IDIGNORE

IDNO

IDOK

IDRETRY

IDYES[/b]

 

Exemplo:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

na resposta vc pode usar algo como exit, se vc quiser simplesmente sair do bloco de comando.

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se