diff options
Diffstat (limited to 'src/gui')
-rw-r--r-- | src/gui/gui_form.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/gui/gui_form.pas b/src/gui/gui_form.pas index 5b5ca64c..bf2ae6bc 100644 --- a/src/gui/gui_form.pas +++ b/src/gui/gui_form.pas @@ -318,8 +318,8 @@ end; procedure TfpgForm.Close; begin - fpgApplication.RemoveComponent(self); Hide; + fpgApplication.RemoveComponent(self); if fpgApplication.MainForm = self then fpgApplication.Terminated := True; end; |