Gente,
uma simples olhada no Help do Delphi, resolverá essa questão interminavel...
function MessageBox(const Text, Caption: PChar; Flags: Longint = MB_OK):
Integer;
const Text = O Texto que aparecerá na caixa;
Caption: PChar = O Caption (Título) da janelinha que vai aparecer;
Flags = Quais botões vc quer que apareça.
No mesmo HELP, tem o que vc pode usar de Flags:
Value Meaning
MB_ABORTRETRYIGNORE The message box contains three push buttons:
Abort, Retry, and Ignore.
MB_OK The message box
contains one push button: OK. This is the default.
MB_OKCANCEL The message box contains two
push buttons: OK and Cancel.
MB_RETRYCANCEL The message box contains two push
buttons: Retry and Cancel.
MB_YESNO The message box contains
two push buttons: Yes and No.
MB_YESNOCANCEL The message box contains three push
buttons: Yes, No, and Cancel.
No mesmo HELP, diz que é uma função, se é uma função, ele devolve valores,
Value Numeric value Meaning
IDOK 1 The user chose the OK button.
IDCANCEL 2 The user chose the Cancel button.
IDABORT 3 The user chose the Abort button.
IDRETRY 4 The user chose the Retry button.
IDIGNORE 5 The user chose the Ignore button.
IDYES 6 The user chose the Yes button.
IDNO 7 The user chose the No button.
O '36' do exemplo passado pelo nosso amigo, em
if Application.MessageBox('Deseja excluir esse registro?','Confirmação
de Exclusão',36)=6 then begin
deve ser a constante utilizada para os FLAGS, mas não sem quais são os
números.... Uso direto a constante, para falar a verdade,uso a constante nos
dois locais que tem os números, assim:
if Application.MessageBox('Deseja excluir esse registro?','Confirmação
de Exclusão',MB_YESNO + MB_ICONQUESTION) = IdYes then begin
// rotina de exclusao
ONDE:
'Deseja excluir esse registro?' ===> TEXTO DA JANELINHA
'Confirmação de Exclusão' ===> CAPTION DA JANELINHA
MB_YESNO + MB_ICONQUESTION ===> Coloca botões de "SIM" e "NÃO" + o ìcone de
Interrogação
IdYes ===> SE O USUÁRIO CLICOU NO BOTÃO "SIM"
Abraços,
Eduardo RC Neto
Desenvolvimento de Sistemas
-------------------------------------------------------
Archive ISP - Rio de Janeiro - RJ
[EMAIL PROTECTED]
www.archive.com.br
MSN: [EMAIL PROTECTED]
SKYPE: dida_ercn
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< 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
