diff options
author | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2007-08-27 12:57:16 +0000 |
---|---|---|
committer | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2007-08-27 12:57:16 +0000 |
commit | 316a16c5f3337ad23ecdfdd6444c0b72af3f2406 (patch) | |
tree | a4209a054dc20164758f01c619533b09ca120acc /extras/tiopf/gui/tiDialogs.pas | |
parent | 4fd4e5cc02054005ce8a9aae976350aefc54a94e (diff) | |
download | fpGUI-316a16c5f3337ad23ecdfdd6444c0b72af3f2406.tar.xz |
* Implemented List Mediators with tiOPF support and added a demo.
* Added a quick workaround for the InvertCaret function causing a AV.
* MenuBar now keeps the current menu focused even if you open more than
2 levels deep of Popup Menus.
* Added some TODO entries to Widgets. Also published some missing properties.
* Fixed repainting issue with TfpgComobBox when you set the Width from code
and made the component focusable. Not sure why it wasn't!
* Updated Lazarus IDE code template for new fpGUI applications.
Diffstat (limited to 'extras/tiopf/gui/tiDialogs.pas')
-rw-r--r-- | extras/tiopf/gui/tiDialogs.pas | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/extras/tiopf/gui/tiDialogs.pas b/extras/tiopf/gui/tiDialogs.pas index 5458820b..430cd194 100644 --- a/extras/tiopf/gui/tiDialogs.pas +++ b/extras/tiopf/gui/tiDialogs.pas @@ -95,11 +95,11 @@ begin lForm.WindowTitle := pHeading; lForm.WindowPosition := wpScreenCenter; lForm.Name := 'FormShowStrings'; -// lMemo.Parent := lForm; - lMemo.Align := alClient; lMemo.Lines.Assign(AStrings); lMemo.FontDesc := 'Courier New-10'; gGUIINI.ReadFormState(lForm); + lMemo.SetPosition(0, 0, lForm.Width, lForm.Height); + lMemo.Align := alClient; lForm.ShowModal; gGUIINI.WriteFormState(lForm); finally |