diff options
| author | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2008-04-16 15:06:00 +0000 |
|---|---|---|
| committer | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2008-04-16 15:06:00 +0000 |
| commit | e85a26bf3dcdec9cc7df33faaba63679a933093a (patch) | |
| tree | 4b9b5fbd6e5b7a0898622ead7be4b171d3e15ebd /src/gui | |
| parent | 4c4961209a1848270721d8a3088410a366e53d5e (diff) | |
| download | fpGUI-e85a26bf3dcdec9cc7df33faaba63679a933093a.tar.xz | |
* More implemented for MVP framework.
* Minor workaround bug fix for saving minimized form state.
Diffstat (limited to 'src/gui')
| -rw-r--r-- | src/gui/gui_iniutils.pas | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/src/gui/gui_iniutils.pas b/src/gui/gui_iniutils.pas index 30123675..9bd204a8 100644 --- a/src/gui/gui_iniutils.pas +++ b/src/gui/gui_iniutils.pas @@ -218,8 +218,13 @@ begin // writeInteger(LINISection, 'WindowState', ord(AForm.WindowState)); // if AForm.WindowState = wsNormal then // begin - writeInteger(LINISection, 'Top', AForm.Top); - writeInteger(LINISection, 'Left', AForm.Left); + + // A work-around while WindowState is not implemented + if (AForm.Top >= 0) or (AForm.Left >= 0) then + begin + writeInteger(LINISection, 'Top', AForm.Top); + writeInteger(LINISection, 'Left', AForm.Left); + end; if AForm.Sizeable then begin writeInteger(LINISection, 'Height', AForm.Height); |