pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

tvplanit: Fix gadgets demo for Laz 1.4.4.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@5056 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2016-07-31 11:55:04 +00:00
parent 3771d2c3bb
commit 710725dd66
3 changed files with 28 additions and 29 deletions
Download Patch File Download Diff File Expand all files Collapse all files

41
components/tvplanit/examples/gadgets/unit1.lfm
View File

@ -28,7 +28,7 @@ object Form1: TForm1
Active = False
Color = clForm
ClockMode = cmClock
DigitalOptions.MilitaryTime = True
DigitalOptions.MilitaryTime = False
DigitalOptions.OnColor = clLime
DigitalOptions.OffColor = 930866
DigitalOptions.BgColor = clBlack
@ -57,11 +57,11 @@ object Form1: TForm1
object BtnStartStop: TButton
Left = 351
Height = 51
Top = 80
Top = 189
Width = 99
Caption = 'Start'
OnClick = BtnStartStopClick
TabOrder = 1
TabOrder = 6
end
object RgClockMode: TRadioGroup
Left = 224
@ -88,23 +88,10 @@ object Form1: TForm1
OnClick = RgClockModeClick
TabOrder = 2
end
object EdCountDownTime: TTimeEdit
Left = 351
Height = 23
Top = 172
Width = 99
ButtonWidth = 23
NumGlyphs = 1
MaxLength = 0
OnChange = EdCountDownTimeChange
TabOrder = 3
Visible = False
Text = '00:30:00'
end
object LblCountDownTime: TLabel
Left = 351
Height = 15
Top = 152
Top = 72
Width = 98
Caption = 'Count-down time:'
FocusControl = EdCountDownTime
@ -114,11 +101,11 @@ object Form1: TForm1
object CbNewClockFace: TCheckBox
Left = 351
Height = 19
Top = 221
Top = 141
Width = 100
Caption = 'New clock face'
OnChange = CbNewClockFaceChange
TabOrder = 4
TabOrder = 5
end
object LblElapsedTime: TLabel
Left = 224
@ -150,16 +137,26 @@ object Form1: TForm1
'Digital'
)
OnClick = RgDisplayModeClick
TabOrder = 5
TabOrder = 1
end
object CbMilitaryTime: TCheckBox
Left = 351
Height = 19
Top = 208
Top = 128
Width = 87
Caption = 'Military time'
OnChange = CbMilitaryTimeChange
TabOrder = 6
TabOrder = 4
Visible = False
end
object EdCountDownTime: TEdit
Left = 351
Height = 23
Top = 92
Width = 99
OnChange = EdCountDownTimeChange
TabOrder = 3
Text = '00:00:30'
Visible = False
end
end