You've already forked lazarus-ccr
jvcllaz: Fix JvHMI package name case. Fix compilation in Linux. Add color selection to demo program of DialButton.
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6946 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
@ -2,10 +2,10 @@ object Form1: TForm1
|
||||
Left = 345
|
||||
Height = 290
|
||||
Top = 131
|
||||
Width = 320
|
||||
Width = 363
|
||||
Caption = 'Form1'
|
||||
ClientHeight = 290
|
||||
ClientWidth = 320
|
||||
ClientWidth = 363
|
||||
OnCreate = FormCreate
|
||||
LCLVersion = '2.1.0.0'
|
||||
object JvDialButton1: TJvDialButton
|
||||
@ -17,7 +17,6 @@ object Form1: TForm1
|
||||
Color = clMoneyGreen
|
||||
DefaultPos = 0
|
||||
ParentColor = False
|
||||
PointerPenWidth = 3
|
||||
Radius = 48
|
||||
TickStyle = tsAuto
|
||||
TabOrder = 0
|
||||
@ -25,65 +24,65 @@ object Form1: TForm1
|
||||
end
|
||||
object JvLED1: TJvLED
|
||||
Left = 197
|
||||
Top = 24
|
||||
Top = 8
|
||||
ColorOn = clRed
|
||||
ColorOff = clMaroon
|
||||
Status = False
|
||||
end
|
||||
object JvLED2: TJvLED
|
||||
Left = 197
|
||||
Top = 40
|
||||
Top = 24
|
||||
ColorOn = clRed
|
||||
ColorOff = clMaroon
|
||||
Status = False
|
||||
end
|
||||
object JvLED3: TJvLED
|
||||
Left = 197
|
||||
Top = 56
|
||||
Top = 40
|
||||
ColorOn = clYellow
|
||||
ColorOff = clOlive
|
||||
Status = False
|
||||
end
|
||||
object JvLED4: TJvLED
|
||||
Left = 197
|
||||
Top = 72
|
||||
Top = 56
|
||||
ColorOn = clYellow
|
||||
ColorOff = clOlive
|
||||
Status = False
|
||||
end
|
||||
object JvLED5: TJvLED
|
||||
Left = 197
|
||||
Top = 88
|
||||
Top = 72
|
||||
ColorOff = clGreen
|
||||
Status = False
|
||||
end
|
||||
object JvLED6: TJvLED
|
||||
Left = 197
|
||||
Top = 104
|
||||
Top = 88
|
||||
ColorOff = clGreen
|
||||
Status = False
|
||||
end
|
||||
object JvLED7: TJvLED
|
||||
Left = 197
|
||||
Top = 120
|
||||
Top = 104
|
||||
ColorOff = clGreen
|
||||
Status = False
|
||||
end
|
||||
object JvLED8: TJvLED
|
||||
Left = 197
|
||||
Top = 136
|
||||
Top = 120
|
||||
ColorOff = clGreen
|
||||
Status = False
|
||||
end
|
||||
object JvLED9: TJvLED
|
||||
Left = 197
|
||||
Top = 152
|
||||
Top = 136
|
||||
ColorOff = clGreen
|
||||
Status = False
|
||||
end
|
||||
object JvLED10: TJvLED
|
||||
Left = 197
|
||||
Top = 168
|
||||
Top = 152
|
||||
ColorOff = clGreen
|
||||
Status = False
|
||||
end
|
||||
@ -136,4 +135,22 @@ object Form1: TForm1
|
||||
TabOrder = 2
|
||||
Text = 'bsNone'
|
||||
end
|
||||
object cbColor: TColorBox
|
||||
Left = 192
|
||||
Height = 24
|
||||
Top = 201
|
||||
Width = 128
|
||||
Selected = clMoneyGreen
|
||||
ItemHeight = 16
|
||||
OnChange = cbColorChange
|
||||
TabOrder = 3
|
||||
end
|
||||
object Label1: TLabel
|
||||
Left = 192
|
||||
Height = 15
|
||||
Top = 184
|
||||
Width = 29
|
||||
Caption = 'Color'
|
||||
ParentColor = False
|
||||
end
|
||||
end
|
||||
|
Reference in New Issue
Block a user