eu uso a função messagebox assim:
If
Application.MessageBox(PChar(Texto),'Confirma',MB_YESNO+MB_ICONQUESTION+MB_D
EFBUTTON2)) = IDYES then
{ coloque aqui seu codigo }
----- Original Message -----
From: "Osmar de Souza Júnior" <[EMAIL PROTECTED]>
To: <delphi-br@yahoogrupos.com.br>
Sent: Friday, March 04, 2005 8:38 AM
Subject: [delphi-br] MessageDlg com "Não" como default
Queria fazer um MessageDlg com o botão "No" vindo com o foco.
Vi no help do Delphi:
MessageDlg('mensagem olá', mtWarning, [mbYes,mbNo], 0, mbNo)
Mas dá erro dizendo que têm parâmetros demais na função...
????
????
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Yahoo! Grupos, um serviço oferecido por:
----------------------------------------------------------------------------
----
Links do Yahoo! Grupos
a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço
do Yahoo!.
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
