summaryrefslogtreecommitdiff
path: root/prototypes
diff options
context:
space:
mode:
authorGraeme Geldenhuys <graemeg@gmail.com>2013-05-08 17:14:37 +0100
committerGraeme Geldenhuys <graemeg@gmail.com>2013-05-08 17:14:37 +0100
commitf6f974e79df0b3cc43b905b8bb1b68388907d819 (patch)
treea452614831773b4b8c636e4e365d9f35c818f554 /prototypes
parentb062c07f6c80e909eb80d39fbf8d7d0cf3df7b5c (diff)
downloadfpGUI-f6f974e79df0b3cc43b905b8bb1b68388907d819.tar.xz
edittest: define the height of ComboBox widgets to match height of Edit widgets
Diffstat (limited to 'prototypes')
-rw-r--r--prototypes/fpgui2/tests/edittest.lpr4
1 files changed, 2 insertions, 2 deletions
diff --git a/prototypes/fpgui2/tests/edittest.lpr b/prototypes/fpgui2/tests/edittest.lpr
index df98cc73..e69cfca4 100644
--- a/prototypes/fpgui2/tests/edittest.lpr
+++ b/prototypes/fpgui2/tests/edittest.lpr
@@ -439,7 +439,7 @@ begin
btn.ShowImage := True;
btn.Height := 55;
- combo1 := CreateComboBox(self, 10, 200, 120, nil);
+ combo1 := CreateComboBox(self, 10, 200, 120, nil, 22);
combo1.BackgroundColor := clYellow;
combo1.TextColor := clBlue;
combo1.Items.Add('ilImageLeft');
@@ -449,7 +449,7 @@ begin
combo1.FocusItem := 0;
combo1.OnChange := @Combo1Changed;
- combo2 := CreateComboBox(self, 10, 230, 120, nil);
+ combo2 := CreateComboBox(self, 10, 230, 120, nil, 22);
for i := 1 to 20 do
combo2.Items.Add(Format('Items %.2d', [i]));