2 PERGUNTAS SOBRE O MESSAGEDLG

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

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: