Discussion :

[sgmsg]

Bonjour à tous

Excusez-moi de réexpédier le message, il semble qu'il a disparu... (il risque de réapparaître qui sait ;-)

Comment intercepter une erreur qui se passe en dehors du déroulement normal des procédures?

Par exemple
1 - Je fais une requête;
2 - J'attends la réponse : notification, alarme, etc.
3 - Je la traite.

Il arrive qu'une erreur exceptionnelle se produise [ entre 2) et 3) ] et ne soit pas pris en charge par le contrôle d'erreur déjà en place, et brise la séquence...

Merci d'avance

[ShaiLeTroll]

Cela dépend de la lib
MyDAC ou ODAC fournisse un OnError sur la Session

Comment attends-tu la réponse ?
tu lance des SQL en thread ? car sinon le Open est bloquant !
D'ailleurs un mode thread sur le Open, il ne faut surtout pas lié de DBControls dessus !

[sgmsg]

Voilà

Dans les déclarations de la fiche:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
TForm1 = class(TForm)
    procedure ExceptionGlobale(Sender : TObject; E : Exception );
...

Ensuite le code de la sous-routine

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
procedure TForm1.ExceptionGlobale(Sender : TObject; E : Exception );
begin
//**
end;

Finalement référer les erreurs inattendues à la routine précédemment déclarée

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
procedure TForm1.FormCreate(Sender: TObject);
begin
    application.OnException:=ExceptionGlobale;
...

Merci à tous

Merci Shai.*

(* Je voudrais bien te répondre mais je suis complètement déporter par ton niveau de connaissance.
Si ça peut répondre à ton interrogation, c'est lors d'une requête indy, nmhttp, ou navigation avec webbrowser)