diff options
author | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2008-01-03 11:40:27 +0000 |
---|---|---|
committer | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2008-01-03 11:40:27 +0000 |
commit | b742ef33b0d8657e556e1182bccd89c224bff844 (patch) | |
tree | c07d96d1c5cfdeed175f1b1f7a2bfae1ec6accdd /src/gui | |
parent | 47eae709235dc3607d643ed0caff42d8489b6912 (diff) | |
download | fpGUI-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.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; |