...und wenn ich im MessageDialog auf das "x" klicke, wird das Hauptformular ebenfalls geschlossen
Die Abfrage sollte man besser so formulieren:
Delphi-Quellcode:
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
if MessageDlg('Wollen Sie wirklich beenden?', mtConfirmation, [mbYes, mbNo], 0) <> mrYes then
CanClose := False;
end;
Gruß Hawkeye
//Edit: @ManuMF: gleiche Idee, aber kleiner Fehler
//Edit2: Mein Fehler