Salut

OnCloseQuery correspond bien à ton besoin.
Un petit coup de :f1: et l'aide t'aurait donné cet exemple d'utilisation.:
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose:...