paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-11 17:16:01 +02:00
Code Issues Packages Projects Releases Wiki Activity

customdrawn tests: Improves the checkbox tests

Browse Source 
git-svn-id: trunk@33509 -
This commit is contained in:
sekelsenmat 2011-11-13 18:46:36 +00:00
parent 697746f2e9
commit a90f20cd58
3 changed files with 57 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

30
test/customdrawn/cd_test_all.lpi
View File

@ -14,7 +14,7 @@
<VersionInfo> <VersionInfo>
<StringTable ProductVersion=""/> <StringTable ProductVersion=""/>
</VersionInfo> </VersionInfo>
<BuildModes Count="2"> <BuildModes Count="3">
<Item1 Name="Default" Default="True"/> <Item1 Name="Default" Default="True"/>
<Item2 Name="WinCE"> <Item2 Name="WinCE">
<MacroValues Count="1"> <MacroValues Count="1">
@ -48,6 +48,34 @@
</Other> </Other>
</CompilerOptions> </CompilerOptions>
</Item2> </Item2>
<Item3 Name="qt">
<MacroValues Count="1">
<Macro1 Name="LCLWidgetType" Value="qt"/>
</MacroValues>
<CompilerOptions>
<Version Value="11"/>
<Target>
<Filename Value="cd_test_all"/>
</Target>
<SearchPaths>
<IncludeFiles Value="$(ProjOutDir)"/>
<UnitOutputDirectory Value="lib/$(TargetCPU)-$(TargetOS)"/>
</SearchPaths>
<Linking>
<Options>
<Win32>
<GraphicApplication Value="True"/>
</Win32>
</Options>
</Linking>
<Other>
<CompilerMessages>
<UseMsgFile Value="True"/>
</CompilerMessages>
<CompilerPath Value="$(CompPath)"/>
</Other>
</CompilerOptions>
</Item3>
</BuildModes> </BuildModes>
<PublishOptions> <PublishOptions>
<Version Value="2"/> <Version Value="2"/>

35
test/customdrawn/mainform.lfm
View File

@ -60,7 +60,7 @@ object Form1: TForm1
Height = 240 Height = 240
Top = 40 Top = 40
Width = 463 Width = 463
PageIndex = 22 PageIndex = 6
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
TabOrder = 2 TabOrder = 2
TabStop = True TabStop = True
@ -186,8 +186,8 @@ object Form1: TForm1
Left = 20 Left = 20
Height = 18 Height = 18
Top = 29 Top = 29
Width = 91 Width = 60
Caption = 'CheckBox1' Caption = 'Native'
TabOrder = 0 TabOrder = 0
end end
object CDCheckBox1: TCDCheckBox object CDCheckBox1: TCDCheckBox
@ -210,9 +210,9 @@ object Form1: TForm1
Left = 20 Left = 20
Height = 18 Height = 18
Top = 55 Top = 55
Width = 91 Width = 99
AllowGrayed = True AllowGrayed = True
Caption = 'CheckBox2' Caption = 'Native+Gray'
Checked = True Checked = True
State = cbChecked State = cbChecked
TabOrder = 3 TabOrder = 3
@ -229,7 +229,7 @@ object Form1: TForm1
object CDCheckBox4: TCDCheckBox object CDCheckBox4: TCDCheckBox
Left = 119 Left = 119
Height = 19 Height = 19
Top = 94 Top = 88
Width = 114 Width = 114
AllowGrayed = True AllowGrayed = True
DrawStyle = dsWinCE DrawStyle = dsWinCE
@ -239,19 +239,36 @@ object Form1: TForm1
Left = 119 Left = 119
Height = 19 Height = 19
Top = 117 Top = 117
Width = 113 Width = 74
DrawStyle = dsWinXP DrawStyle = dsWinXP
Caption = 'dsWinXP+Gray' Caption = 'dsWinXP'
end end
object CDCheckBox6: TCDCheckBox object CDCheckBox6: TCDCheckBox
Left = 119 Left = 119
Height = 19 Height = 19
Top = 141 Top = 136
Width = 113 Width = 113
AllowGrayed = True AllowGrayed = True
DrawStyle = dsWinXP DrawStyle = dsWinXP
Caption = 'dsWinXP+Gray' Caption = 'dsWinXP+Gray'
end end
object CDCheckBox7: TCDCheckBox
Left = 119
Height = 19
Top = 167
Width = 86
DrawStyle = dsAndroid
Caption = 'dsAndroid'
end
object CDCheckBox8: TCDCheckBox
Left = 119
Height = 19
Top = 184
Width = 125
AllowGrayed = True
DrawStyle = dsAndroid
Caption = 'dsAndroid+Gray'
end
end end
object pageRadioButton: TPage object pageRadioButton: TPage
object GroupBox2: TGroupBox object GroupBox2: TGroupBox

2
test/customdrawn/mainform.pas
View File

@ -25,6 +25,8 @@ type
CDCheckBox4: TCDCheckBox; CDCheckBox4: TCDCheckBox;
CDCheckBox5: TCDCheckBox; CDCheckBox5: TCDCheckBox;
CDCheckBox6: TCDCheckBox; CDCheckBox6: TCDCheckBox;
CDCheckBox7: TCDCheckBox;
CDCheckBox8: TCDCheckBox;
CDEdit1: TCDEdit; CDEdit1: TCDEdit;
CDEdit2: TCDEdit; CDEdit2: TCDEdit;
CDTabControl1: TCDTabControl; CDTabControl1: TCDTabControl;