diff options
author | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2008-02-01 21:52:46 +0000 |
---|---|---|
committer | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2008-02-01 21:52:46 +0000 |
commit | 214510635fcf4c37bef52ee7be7ab1be280e9d55 (patch) | |
tree | 1fce7a4bd704fe6817819d28d4352c94f8334747 /extras | |
parent | dc4c89ecd2e6c733b73f3d185d9ab421663e2bb0 (diff) | |
download | fpGUI-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.pas | 4 | ||||
-rw-r--r-- | extras/tiopf/demos/ListControlDemo/listcontroldemo.lpi | 15 |
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"/> |