summaryrefslogtreecommitdiff
path: root/extras
diff options
context:
space:
mode:
authorgraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2008-02-01 21:52:46 +0000
committergraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2008-02-01 21:52:46 +0000
commit214510635fcf4c37bef52ee7be7ab1be280e9d55 (patch)
tree1fce7a4bd704fe6817819d28d4352c94f8334747 /extras
parentdc4c89ecd2e6c733b73f3d185d9ab421663e2bb0 (diff)
downloadfpGUI-214510635fcf4c37bef52ee7be7ab1be280e9d55.tar.xz
* Fixed old Color property to TextColor.
* Created new TfpgComponent class with TagPointer property. TagPointer is like TComponent.Tag but just a pointer instead of Integer.
Diffstat (limited to 'extras')
-rw-r--r--extras/tiopf/demos/ListControlDemo/frmMain.pas4
-rw-r--r--extras/tiopf/demos/ListControlDemo/listcontroldemo.lpi15
2 files changed, 10 insertions, 9 deletions
diff --git a/extras/tiopf/demos/ListControlDemo/frmMain.pas b/extras/tiopf/demos/ListControlDemo/frmMain.pas
index 49797cfc..ddb9d91a 100644
--- a/extras/tiopf/demos/ListControlDemo/frmMain.pas
+++ b/extras/tiopf/demos/ListControlDemo/frmMain.pas
@@ -166,8 +166,8 @@ begin
AgeTrackBar.ShowPosition := True;
AgeTrackBar.Enabled := False;
- CreateLabel(self, edtName.Right + 30, edtName.Top, 'These components observe the ').Color := clBlue;
- CreateLabel(self, edtName.Right + 30, AgeTrackBar.Top-5, 'selected item of ComboBox').Color := clBlue;
+ CreateLabel(self, edtName.Right + 30, edtName.Top, 'These components observe the ').TextColor := clBlue;
+ CreateLabel(self, edtName.Right + 30, AgeTrackBar.Top-5, 'selected item of ComboBox').TextColor := clBlue;
cbPeople := TfpgComboBox.Create(self);
cbPeople.Top := AgeTrackBar.Bottom + 17;
diff --git a/extras/tiopf/demos/ListControlDemo/listcontroldemo.lpi b/extras/tiopf/demos/ListControlDemo/listcontroldemo.lpi
index 4a51b108..ce2c1eaf 100644
--- a/extras/tiopf/demos/ListControlDemo/listcontroldemo.lpi
+++ b/extras/tiopf/demos/ListControlDemo/listcontroldemo.lpi
@@ -1,7 +1,7 @@
<?xml version="1.0"?>
<CONFIG>
<ProjectOptions>
- <PathDelim Value="/"/>
+ <PathDelim Value="\"/>
<Version Value="5"/>
<General>
<Flags>
@@ -9,7 +9,7 @@
</Flags>
<SessionStorage Value="InProjectDir"/>
<MainUnit Value="0"/>
- <IconPath Value="./"/>
+ <IconPath Value=".\"/>
<TargetFileExt Value=""/>
</General>
<VersionInfo>
@@ -23,7 +23,7 @@
<RunParams>
<local>
<FormatVersion Value="1"/>
- <LaunchingApplication PathPlusParams="/usr/X11R6/bin/xterm -T 'Lazarus Run Output' -e $(LazarusDir)/tools/runwait.sh $(TargetCmdLine)"/>
+ <LaunchingApplication PathPlusParams="\usr\X11R6\bin\xterm -T 'Lazarus Run Output' -e $(LazarusDir)\tools\runwait.sh $(TargetCmdLine)"/>
</local>
</RunParams>
<RequiredPackages Count="1">
@@ -44,17 +44,17 @@
<UnitName Value="frmMain"/>
</Unit1>
<Unit2>
- <Filename Value="../Common/Model_View.pas"/>
+ <Filename Value="..\Common\Model_View.pas"/>
<IsPartOfProject Value="True"/>
<UnitName Value="Model_View"/>
</Unit2>
<Unit3>
- <Filename Value="../Common/Constants.pas"/>
+ <Filename Value="..\Common\Constants.pas"/>
<IsPartOfProject Value="True"/>
<UnitName Value="Constants"/>
</Unit3>
<Unit4>
- <Filename Value="../Common/Model.pas"/>
+ <Filename Value="..\Common\Model.pas"/>
<IsPartOfProject Value="True"/>
<UnitName Value="Model"/>
</Unit4>
@@ -62,8 +62,9 @@
</ProjectOptions>
<CompilerOptions>
<Version Value="5"/>
+ <PathDelim Value="\"/>
<SearchPaths>
- <OtherUnitFiles Value="../Common/"/>
+ <OtherUnitFiles Value="..\Common\"/>
</SearchPaths>
<CodeGeneration>
<Generate Value="Faster"/>