2018-03-13 15:25:01 +00:00
object frmMain: TfrmMain
2018-04-18 22:20:45 +00:00
Left = 411
Height = 352
Top = 332
Width = 594
AutoSize = True
2018-03-13 15:25:01 +00:00
BorderStyle = bsSingle
Caption = 'JvSimScope demo'
2018-04-18 22:20:45 +00:00
ClientHeight = 352
ClientWidth = 594
2018-03-13 15:25:01 +00:00
Color = clBtnFace
Font.Color = clWindowText
Position = poScreenCenter
LCLVersion = '1.9.0.0'
object jssRandom: TJvSimScope
2018-04-18 22:20:45 +00:00
AnchorSideLeft.Control = lblRandomDetails1
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = lblRandomDetails1
AnchorSideBottom.Control = btnActivateDeactivateRandom
AnchorSideBottom.Side = asrBottom
Left = 276
Height = 207
2018-03-13 15:25:01 +00:00
Top = 48
2018-04-18 22:20:45 +00:00
Width = 252
2018-03-13 15:25:01 +00:00
Active = False
BaseLine = 0
BaseLineUnit = jluAbsolute
DisplayUnits = jduLogical
Interval = 100
Lines = <
item
Name = 'Random'
Color = clAqua
Position = 0
PositionUnit = jluAbsolute
end
item
Name = 'Random 2'
Color = clYellow
Position = 0
PositionUnit = jluAbsolute
end>
Minimum = -100
Maximum = 100
TotalTimeSteps = 240
OnUpdate = jssRandomUpdate
2018-04-18 22:20:45 +00:00
Anchors = [akTop, akLeft, akBottom]
BorderSpacing.Right = 24
2018-03-13 15:25:01 +00:00
end
object Label1: TLabel
2018-04-18 22:20:45 +00:00
AnchorSideLeft.Control = lblRandomDetails1
AnchorSideTop.Control = lblRandomDetails1
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = lblRandomDetails1
AnchorSideRight.Side = asrBottom
2018-03-13 15:25:01 +00:00
Left = 16
2018-04-18 22:20:45 +00:00
Height = 75
Top = 131
Width = 244
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 8
2018-03-13 15:25:01 +00:00
Caption = 'The yellow line values are meant to go higher than the maximum value set at design time for the scope. Use the button below to change that value and notice how the lines are completely adjusted to this change.'
2018-04-18 22:20:45 +00:00
Constraints.MaxWidth = 250
2018-03-13 15:25:01 +00:00
ParentColor = False
WordWrap = True
end
object lblWelcome: TLabel
AnchorSideLeft.Control = Owner
AnchorSideLeft.Side = asrCenter
2018-04-18 22:20:45 +00:00
AnchorSideTop.Control = Owner
Left = 141
2018-03-13 15:25:01 +00:00
Height = 28
Top = 8
Width = 312
2018-04-18 22:20:45 +00:00
BorderSpacing.Top = 8
2018-03-13 15:25:01 +00:00
Caption = 'Welcome to the TJvSimScope demo'
Font.Color = clWindowText
Font.Height = -20
ParentColor = False
ParentFont = False
end
object btnActivateDeactivateRandom: TButton
2018-04-18 22:20:45 +00:00
AnchorSideLeft.Control = lblRandomDetails1
AnchorSideTop.Control = Label1
AnchorSideTop.Side = asrBottom
AnchorSideBottom.Side = asrBottom
2018-03-13 15:25:01 +00:00
Left = 32
Height = 25
2018-04-18 22:20:45 +00:00
Top = 230
Width = 69
AutoSize = True
BorderSpacing.Left = 16
BorderSpacing.Top = 24
BorderSpacing.Bottom = 24
2018-03-13 15:25:01 +00:00
Caption = 'Activate'
OnClick = btnActivateDeactivateRandomClick
TabOrder = 0
end
object btnAdjustMax: TButton
2018-04-18 22:20:45 +00:00
AnchorSideLeft.Control = btnActivateDeactivateRandom
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = btnActivateDeactivateRandom
AnchorSideBottom.Control = jssRandom
AnchorSideBottom.Side = asrBottom
Left = 117
2018-03-13 15:25:01 +00:00
Height = 25
2018-04-18 22:20:45 +00:00
Top = 230
Width = 116
AutoSize = True
BorderSpacing.Left = 16
BorderSpacing.Bottom = 16
2018-03-13 15:25:01 +00:00
Caption = 'Adjust Max value'
OnClick = btnAdjustMaxClick
TabOrder = 1
end
2018-04-18 22:20:45 +00:00
object lblRandomDetails1: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = lblWelcome
AnchorSideTop.Side = asrBottom
Left = 16
Height = 75
Top = 48
Width = 244
BorderSpacing.Left = 16
BorderSpacing.Top = 12
BorderSpacing.Right = 16
Caption = 'This scope shows random values but uses logical units to show a more advanced usage. Here, the Minimum and Maximum values are used and can be adjusted to make the lines fit in the display.'
Constraints.MaxWidth = 250
ParentColor = False
WordWrap = True
end
2018-03-13 15:25:01 +00:00
end