onCloseQuery

[mickmack]

hab gerade bemerkt, dass in meiner Überlegung noch ein Fehler steckt.
Kann es sein, dass folgendes nicht möglich ist. Bzw ich merke ja, dass es nicht möglich ist, aber kennt vielleicht jemand ne Möglichkeit es auf eine ähnliche Weise zu lösen?
Das Problem ist, das Formular ist über showModal geöffnet, und bei einem einfachen Close scheint es ja kein ModalResult zu geben.

Delphi-Quellcode:

procedure TFrmLizenz.BitBtnSpeichernClick(Sender: TObject);
begin
  if checkAll() then
    FrmLizenz.BitBtnSpeichern.ModalResult := mrOK
  else
    FrmLizenz.BitBtnSpeichern.ModalResult := mrNone;
end;

Also kann ich noch irgendwie während des onClicks-Ereignis das ModalResult ändern?