Código
{Exemplo:}
Application.messageBox('Deseja Excluir esse Registro?','Confirmação',mb_YesNo+mb_IconInformation+mb_DefButton2)then
tbl_clientes.delete;
{Essa eh uma confirmação de exclusão, antes de excluir o registro o sistema pergunta ao usuário, a segunda aspas eh o titulo da mensagem, o mb_YesNo são os botões que a mensagem terá, o mb_IconInformation é o ícone que aparecerá na mensagem e o DefButton2 diz o foco do botão, no caso se apertar enter será Não}
{Tipos de icones: mb_IconInformation, mb_IconExclamation, mb_IconQuestion, mb_IconError}
{Tipos de botões: mb_Ok, _mb_YesNo, mb_OkCancel, tbm tem Abort, Retry e Cancel}
{exemplo de mensagem simples:}
Application.MessageBox('Operação Realizada com Sucesso!','Aviso',mb_Ok+mb_IconExclamation);
Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009