Resposta := messagebox(...) case Resposta of mrYes: begin try // salva dados; CanClose := True; except raise; end; end; mrNo: begin CanClose := True; end; mrCancel: begin CanClose := False; end; end;
-----Mensagem Original----- De: "Erika Lemes" <[EMAIL PROTECTED]> Para: <delphi-br@yahoogrupos.com.br> Enviada em: sexta-feira, 28 de janeiro de 2005 14:50 Assunto: Re: [delphi-br] Cancel - MessageBox Eu ainda não consegui .... alguém teria mais alguma idéia? Pois se eu não colocar nada, ele fecha a tela... eu queria que ao cancelar, a tela continuasse aberta com os dados... Obrigado!!! Pergunta original: Pessoal Eu tenho message box com os tres botões: - sim - não - cancelar queria fazer o seginte: - sim: gravar e sair - não: sair sem gravar - cancelar: não fazer nada, apenas fechar o message box O sim e o não estão ok... mas como faço para cancelar? --------------------------------- Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador do Yahoo! agora. [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 -- <<<<< 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