Validações

Delphi

15/10/2011

Bom pessoal, uma coisa que nunca tratei no meus projetos são os erro que faz fechar o sistema e até erros de relacionamento em tabela.....
Então queria uma ajuda nisso...

1º Como faço para que antes de dar uns erros estranhos de access violation ele dá a mensagem do erro mas não fecha o sistema ?

2º Em alguns casos eu verifico manual fazendo um select para ver se o registro a ser excluido não está sendo usado, queria saber se tem como fazer algo como um trigger ou procedure ou até mesmo função para que antes de excluir verificar esse relacionamento e poder avisar o usuario que não pode excluir porque está relacionado com tal registro em tal tabela......como vou fazer isso ?


Agradeço o auxilio.....
abraços
Robson Morais

Robson Morais

Curtidas 0

Respostas

Rafael Ribeiro

Rafael Ribeiro

15/10/2011

Use try...exception!
GOSTEI 0
Robson Morais

Robson Morais

15/10/2011

Valeu obrigado....vou estudar sobre eles....
GOSTEI 0
Gustavo Bretas

Gustavo Bretas

15/10/2011

RobinhoCne, eu uso o evento OnException da Aplicação, da uma olhada no exemplo do Delphi te ajuda!

procedure TForm1.FormCreate(Sender: TObject);
begin
  Application.OnException := AppException;
end;
 
procedure TForm1.AppException(Sender: TObject; E: Exception);
begin
  Application.ShowException(E);
  Application.Terminate;
end; 
 
procedure TForm1.Button1Click(Sender: TObject);
begin
  raise EPasswordInvalid.Create(Incorrect password entered);
end;


Antes de mostrar a mensagem para o usuário vc pode tratar a mensagem, no caso de um erro de FK como vc disse, vc pode traduzir pra o usuário!

No caso do Access Violation é mais complicado, então para erros inisperados eu uso uma mensagem genérica, pedindo para entrar em contato!

Mas ainda sim é importante usar Try Exception!
GOSTEI 0
Robson Morais

Robson Morais

15/10/2011

Obrigado valeu.....
GOSTEI 0
POSTAR