Buscar

Utilizando application.messagebox

Código

{Você pode utilizar esse comando para fazer confirmações de algum evento ou para apenas dar uma mensagem mais bonita do que o showmessage para o usuário}

{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);

 

Publicidade

Vote na dica




Quantidade de votos: 0 votos
Aceitação: 0%


Detalhes da dica

Categoria: Object pascal
Adicionada dia: 26/10/07
Por: Ivan Luiz Picoli
Visualizada: 62995 vezes

Planeta Delphi - Tudo sobre programação Delphi Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009