paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-06 15:41:45 +02:00
Code Issues Packages Projects Releases Wiki Activity

custom drawn tests: Improves the trackbar tests

Browse Source 
git-svn-id: trunk@33407 -
This commit is contained in:
sekelsenmat 2011-11-08 07:56:32 +00:00
parent ac422ad68d
commit 3e0f825405
2 changed files with 13 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
test/customdrawn/mainform.lfm
View File

@ -50,7 +50,7 @@ object Form1: TForm1
Height = 240 Height = 240
Top = 40 Top = 40
Width = 439 Width = 439
PageIndex = 4 PageIndex = 14
TabOrder = 2 TabOrder = 2
TabStop = True TabStop = True
object pageMenu: TPage object pageMenu: TPage
@ -312,7 +312,7 @@ object Form1: TForm1
object pageTrackBars: TPage object pageTrackBars: TPage
object TrackBar1: TTrackBar object TrackBar1: TTrackBar
Left = 7 Left = 7
Height = 25 Height = 33
Top = 16 Top = 16
Width = 100 Width = 100
Position = 0 Position = 0
@ -321,13 +321,21 @@ object Form1: TForm1
end end
object CDTrackBar1: TCDTrackBar object CDTrackBar1: TCDTrackBar
Left = 151 Left = 151
Height = 25 Height = 33
Top = 16 Top = 64
Width = 100 Width = 100
Color = clBtnFace Color = clBtnFace
DrawStyle = dsExtra1 DrawStyle = dsExtra1
Position = 0 Position = 0
end end
object CDTrackBar2: TCDTrackBar
Left = 151
Height = 33
Top = 16
Width = 100
DrawStyle = dsCommon
Position = 0
end
end end
object Page8: TPage object Page8: TPage
end end

1
test/customdrawn/mainform.pas
View File

@ -26,6 +26,7 @@ type
CDEdit2: TCDEdit; CDEdit2: TCDEdit;
CDRadioButton1: TCDRadioButton; CDRadioButton1: TCDRadioButton;
CDStaticText1: TCDStaticText; CDStaticText1: TCDStaticText;
CDTrackBar2: TCDTrackBar;
editWinXP: TCDEdit; editWinXP: TCDEdit;
CDGroupBox1: TCDGroupBox; CDGroupBox1: TCDGroupBox;
CDGroupBox2: TCDGroupBox; CDGroupBox2: TCDGroupBox;