2 PERGUNTAS SOBRE O MESSAGEDLG

Delphi

14/02/2003

1. COMO FAÇO PARA ALTERAR POR EXEMPLO OK E CANCEL PARA SIM E NÃO

2. COMO FAÇO PARA UTILIZAR YESNOCANCEL POR NÃO CONSIGO FAZER O IF TESTAR, CONSIGO TESTAR A PRIMEIRA OPÇÃO DEPOIS NÃO EXEMPLO, = MRYES AI EU NÃO SEI O QUE COLOCA NO ELSE IF PARA TESTA O MRNO E AI SIM O ELSE PARA O CANCEL

AGUARDO RESPOSTA OBRIGADO...

OUROFRIO@CIBERPOINT.COM.BR


Ourofrio.sp

Ourofrio.sp

Curtidas 0

Respostas

Anonymous

Anonymous

14/02/2003

Caro amigo, não me lembro no momento a sintaxe do dlg,mas se vc quiser use o messagebox, que ja vem com os botões traduzidos pelo sistema operacional.

É assim:

messagebox(handle,´Mensagem que vc quer´,´Titulo da caixa de dialogo´,MB_OK or MB_ICONWARNING);

se vc quiser testar é assim:

if messagebox(handle,´Mensagem que vc quer´,´Titulo da caixa de dialogo´,MB_YESNO or MB_ICONWARNING) = ID_YES then
begin
...
end
else
.....

Vc pode passar para os ícones dos botões 4 tipos de figuras, são elas:
MB_ICONWARNING
MB_ICONQUESTION
MB_ICONINFORMATION
MB_ICONERROR

Não me lembro se ele permite OKCANCEL, mas de uma testada.

Lembre-se, não é preciso traduzir os botões pois eles ja vem traduzidos pelo próprio sistema operacional.
Valeu

qualquer coisa me mande um e-mail:

eduardo@lpnet.com.br


GOSTEI 0
Fred

Fred

14/02/2003

use as mensagens Application.MessageBox que os botões ja vem traduzidos de acordo com o windows
Ex:

Application.messagebox(´Registro nao pode ...´,´Erro´,mb_ok+mb_iconerror)

as respostas sao idyes idok e nao mr

quanto a outra questao tente o seguinte

case mensagem... of
idyes: begin
comandos
end;
idno: begin
comandos
end;
idcancel: begin
comandos
end;
end;

:wink:


GOSTEI 0
POSTAR