summaryrefslogtreecommitdiff
path: root/extras/tiopf
diff options
context:
space:
mode:
authorgraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2008-05-23 08:56:33 +0000
committergraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2008-05-23 08:56:33 +0000
commit7ba2139f6fc402dfc26f1358649771e83b4059f7 (patch)
treef38dd69aebbcc4779668b85f2ead7947465bc5c6 /extras/tiopf
parent479a7c6705ccfbaaf182489d555f92f66a546a94 (diff)
downloadfpGUI-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.lpi2
-rw-r--r--extras/tiopf/demos/ListControlDemo/frmMain.pas18
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;