Hallo,
ich habe ein seltsames Verhalten, weiß nicht, warum das so ist und wie ich es beheben kann...
Delphi-Quellcode:
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
CanClose:=false;
if Editor.Modified then
case MessageDlg('Text im Editor wurde bearbeitet. Soll vor dem Beenden dieser Text gespeichert werden?',mtConfirmation,[mbYes,mbNo,mbCancel],0) of
idYes: begin btn_saveClick(btn_save); CanClose:=true; end;
idNo: CanClose:=true;
idCancel: CanClose:=false;
end
else CanClose:=true;
Ich habe den Dialog jetzt zunächst mit Cancel beantwortet, weil ich noch was nachgucken wollte.
Wenn ich jetzt die Anwendung wieder schließen will, poppt das Dialogfenster kurz auf und wieder weg. Im Debugger sehe ich, daß die Antwort einfach ohne Zutun auf idCancel springt.
Kann mir das Verhalten nicht erklären