diff options
author | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2010-09-20 09:05:52 +0200 |
---|---|---|
committer | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2010-09-20 09:05:52 +0200 |
commit | ddb121dcd5dab08de93b1279e986951263582778 (patch) | |
tree | bb6907b5b9e472d40a6358328d6523c5b393b070 /examples | |
parent | 65a3fe7c6723bcb1717e6b45ea6c976c7133388a (diff) | |
download | fpGUI-ddb121dcd5dab08de93b1279e986951263582778.tar.xz |
Color ListBox example: fixed alignment of lbColorPick component.
Diffstat (limited to 'examples')
-rw-r--r-- | examples/gui/colorlistbox/frmMain.pas | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/examples/gui/colorlistbox/frmMain.pas b/examples/gui/colorlistbox/frmMain.pas index 0392be1d..abe358ce 100644 --- a/examples/gui/colorlistbox/frmMain.pas +++ b/examples/gui/colorlistbox/frmMain.pas @@ -93,6 +93,7 @@ begin Name := 'MainForm'; SetPosition(286, 264, 413, 250); WindowTitle := 'Color ListBox Test'; + Hint := ''; WindowPosition := wpScreenCenter; cbName1 := TfpgComboBox.Create(self); @@ -101,6 +102,7 @@ begin Name := 'cbName1'; SetPosition(12, 36, 172, 22); FontDesc := '#List'; + Hint := ''; TabOrder := 0; end; @@ -131,7 +133,11 @@ begin with lbColorPick do begin Name := 'lbColorPick'; - SetPosition(216, 20, 184, 148); + SetPosition(216, 20, 184, 212); + Anchors := [anLeft,anTop,anBottom]; + FontDesc := '#List'; + Hint := ''; + TabOrder := 4; end; btnName2 := TfpgButton.Create(self); @@ -196,6 +202,7 @@ begin SetPosition(12, 140, 180, 20); Checked := True; FontDesc := '#Label1'; + Hint := ''; TabOrder := 8; Text := 'Show Color Names'; OnChange := @chkColorNameChange; @@ -207,6 +214,7 @@ begin Name := 'chkReorder'; SetPosition(12, 160, 180, 20); FontDesc := '#Label1'; + Hint := ''; TabOrder := 9; Text := 'Drag to reorder'; OnChange := @ckdReorderChanged; |