diff options
author | Graeme Geldenhuys <graemeg@users.sourceforge.net> | 2006-12-27 14:29:56 +0000 |
---|---|---|
committer | Graeme Geldenhuys <graemeg@users.sourceforge.net> | 2006-12-27 14:29:56 +0000 |
commit | ee09ef1e02b76c8f6e64e59990739f187748afe0 (patch) | |
tree | 7fd0b99e5bca8b3ebf3a978d455d5468dfd26a70 /examples/gui/widgettest | |
parent | 95f311fea5b05780a398bd3b9c0a7402cd1cac36 (diff) | |
download | fpGUI-ee09ef1e02b76c8f6e64e59990739f187748afe0.tar.xz |
* Introduced the Color property to TWidget. Not all widgets take this property
into account yet, but will soon.
* Fixed bug where if you call TForm.Show multiple times, it keeps adding the
internal Wnd pointer to the GFApplications.Forms list and later causes a AV.
* Fixed bug where TCustomForm didn't have the WindowOption woWindow set so
TCustomForm decendants never got displayed under Windows.
* Amended the TCustomForm, TCustomPanel, TCustomMenu and TCustomLabel to handle
the TWidget.Color property correctly.
* TComboBox now draws the dropdown window correctly. Scrolling the list of
items using the horizontal scrollbar caused strange artifacts to appear.
* Horizontal scrolling is now also supported in the TComboBox dropdown window
for lengthy items.
* Implemented a very basic TRadioButton glyph for now. It looks damn ugly, but
it works. Will improve the glyph shortly.
* TCustomForm now passes the correct WindowOptions to the TFWindow.Create
constructor.
* For now I duplicate some functions from the types.pp FPC unit into fpgui.pas
Diffstat (limited to 'examples/gui/widgettest')
-rw-r--r-- | examples/gui/widgettest/widgettest.pas | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/examples/gui/widgettest/widgettest.pas b/examples/gui/widgettest/widgettest.pas index 8ba3c5e2..11c2c87c 100644 --- a/examples/gui/widgettest/widgettest.pas +++ b/examples/gui/widgettest/widgettest.pas @@ -747,6 +747,7 @@ begin ComboBox1.Items.Add(Format('Item 1.%d...', [i])); ComboBox2.Items.Add(Format('Item 2.%d...', [i])); end; + ComboBox2.Items.Add('A long item that should cause a horizontal scrollbar to appear.'); BetaLabel.FontColor := clBlue; end; |