summaryrefslogtreecommitdiff
path: root/src/gui
diff options
context:
space:
mode:
authorgraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2008-01-03 11:40:27 +0000
committergraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2008-01-03 11:40:27 +0000
commitb742ef33b0d8657e556e1182bccd89c224bff844 (patch)
treec07d96d1c5cfdeed175f1b1f7a2bfae1ec6accdd /src/gui
parent47eae709235dc3607d643ed0caff42d8489b6912 (diff)
downloadfpGUI-b742ef33b0d8657e556e1182bccd89c224bff844.tar.xz
* Reworked the timing of when windows get removed from the
internal lookup list. * Reordered some methods on destruction of a form. * fpGFX-X11 now reports lost windows for X11 events. * Added extra checks in the X11 event handling to make sure we have found a actual window before we try and process the event. This fixes the crashing of applications when you close a window by clicking the X button on System Menu.
Diffstat (limited to 'src/gui')
-rw-r--r--src/gui/gui_form.pas2
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;