summaryrefslogtreecommitdiff
path: root/prototypes/fpgui2/tests
diff options
context:
space:
mode:
authorgraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2008-02-20 08:19:48 +0000
committergraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2008-02-20 08:19:48 +0000
commit5536205f57378f2a60cc69ace0d6be2dec4a8fd7 (patch)
tree23e930fa22969eee5f2606dbfb0fc3d3f127e861 /prototypes/fpgui2/tests
parent840044a99a1fcdc089565ec2566b1c1741d1bfb0 (diff)
downloadfpGUI-5536205f57378f2a60cc69ace0d6be2dec4a8fd7.tar.xz
* Applied Vladimir's patch for arrow key support in RadioButtons.
* TfpgWidget.TabOrder is now set at creation time. * Published the TabOrder property for all components that can receive keyboard input. * Extended the UI Designer so the TabOrder property can be edited.
Diffstat (limited to 'prototypes/fpgui2/tests')
-rw-r--r--prototypes/fpgui2/tests/edittest.lpi9
-rw-r--r--prototypes/fpgui2/tests/edittest.lpr3
2 files changed, 7 insertions, 5 deletions
diff --git a/prototypes/fpgui2/tests/edittest.lpi b/prototypes/fpgui2/tests/edittest.lpi
index 8b8c2d24..2879bbde 100644
--- a/prototypes/fpgui2/tests/edittest.lpi
+++ b/prototypes/fpgui2/tests/edittest.lpi
@@ -1,15 +1,15 @@
<?xml version="1.0"?>
<CONFIG>
<ProjectOptions>
- <PathDelim Value="\"/>
- <Version Value="5"/>
+ <PathDelim Value="/"/>
+ <Version Value="6"/>
<General>
<Flags>
<SaveOnlyProjectUnits Value="True"/>
</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">
@@ -47,7 +47,6 @@
</ProjectOptions>
<CompilerOptions>
<Version Value="5"/>
- <PathDelim Value="\"/>
<CodeGeneration>
<Generate Value="Faster"/>
</CodeGeneration>
diff --git a/prototypes/fpgui2/tests/edittest.lpr b/prototypes/fpgui2/tests/edittest.lpr
index aa0dddbf..dd407ad8 100644
--- a/prototypes/fpgui2/tests/edittest.lpr
+++ b/prototypes/fpgui2/tests/edittest.lpr
@@ -485,8 +485,11 @@ begin
checkbox2 := CreateCheckBox(self, 10, 285, 'Checkbox Two');
radiobtn1 := CreateRadioButton(self, 180, 265, 'Radio One');
+ radiobtn1.GroupIndex := 2;
radiobtn2 := CreateRadioButton(self, 180, 285, 'Radio Two');
+ radiobtn2.GroupIndex := 2;
radiobtn3 := CreateRadioButton(self, 180, 305, 'Radio Three');
+ radiobtn3.GroupIndex := 2;
radiobtn1.Checked := True;
trackbar1 := TfpgTrackBar.Create(self);