diff options
| author | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2008-05-23 08:56:33 +0000 |
|---|---|---|
| committer | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2008-05-23 08:56:33 +0000 |
| commit | 7ba2139f6fc402dfc26f1358649771e83b4059f7 (patch) | |
| tree | f38dd69aebbcc4779668b85f2ead7947465bc5c6 /extras/tiopf | |
| parent | 479a7c6705ccfbaaf182489d555f92f66a546a94 (diff) | |
| download | fpGUI-7ba2139f6fc402dfc26f1358649771e83b4059f7.tar.xz | |
Minor update in the List controls Demo of tiOPF and MGM.
Diffstat (limited to 'extras/tiopf')
| -rw-r--r-- | extras/tiopf/demos/EditControlsDemo/editmediators.lpi | 2 | ||||
| -rw-r--r-- | extras/tiopf/demos/ListControlDemo/frmMain.pas | 18 |
2 files changed, 10 insertions, 10 deletions
diff --git a/extras/tiopf/demos/EditControlsDemo/editmediators.lpi b/extras/tiopf/demos/EditControlsDemo/editmediators.lpi index d24d8e8b..55dc6b9c 100644 --- a/extras/tiopf/demos/EditControlsDemo/editmediators.lpi +++ b/extras/tiopf/demos/EditControlsDemo/editmediators.lpi @@ -2,7 +2,7 @@ <CONFIG> <ProjectOptions> <PathDelim Value="/"/> - <Version Value="5"/> + <Version Value="6"/> <General> <Flags> <SaveOnlyProjectUnits Value="True"/> diff --git a/extras/tiopf/demos/ListControlDemo/frmMain.pas b/extras/tiopf/demos/ListControlDemo/frmMain.pas index 7876ee3c..b95924e0 100644 --- a/extras/tiopf/demos/ListControlDemo/frmMain.pas +++ b/extras/tiopf/demos/ListControlDemo/frmMain.pas @@ -182,20 +182,20 @@ begin lbl.TextColor := clBlue; lbl.WrapText := True; - cbPeople := TfpgComboBox.Create(self); - cbPeople.Top := AgeTrackBar.Bottom + 17; - cbPeople.Left := 7; - cbPeople.Width := 200; - cbPeople.Hint := 'Shows objects from the object list'; - lbPeople := TfpgListBox.Create(self); - lbPeople.Top := cbPeople.Bottom + 7; - lbPeople.Left := cbPeople.Left; + lbPeople.Top := AgeTrackBar.Bottom + 17; + lbPeople.Left := 7; lbPeople.Height := 200; lbPeople.Width := 200; lbPeople.Hint := 'Shows objects from the object list'; - chkShowDeleted := CreateCheckBox(self, cbPeople.Right + 50, cbPeople.Top, 'Show Deleted'); + cbPeople := TfpgComboBox.Create(self); + cbPeople.Top := AgeTrackBar.Bottom + 17; + cbPeople.Left := lbPeople.Right + 15; + cbPeople.Width := 200; + cbPeople.Hint := 'Shows objects from the object list'; + + chkShowDeleted := CreateCheckBox(self, cbPeople.Left, lbPeople.Bottom-20, 'Show Deleted'); end; |