summaryrefslogtreecommitdiff
path: root/extras
diff options
context:
space:
mode:
Diffstat (limited to 'extras')
-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;