194 lines
3.4 KiB
Plaintext
194 lines
3.4 KiB
Plaintext
object fOPCClient: TfOPCClient
|
|
Left = 0
|
|
Top = 0
|
|
Caption = 'OPC DA Client (Delphi 13 VCL)'
|
|
ClientHeight = 500
|
|
ClientWidth = 750
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -12
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
OnCreate = FormCreate
|
|
OnDestroy = FormDestroy
|
|
TextHeight = 15
|
|
object LabelNode: TLabel
|
|
Left = 16
|
|
Top = 16
|
|
Width = 63
|
|
Height = 15
|
|
Caption = 'Node Name'
|
|
end
|
|
object LabelServer: TLabel
|
|
Left = 16
|
|
Top = 45
|
|
Width = 67
|
|
Height = 15
|
|
Caption = 'Server Name'
|
|
end
|
|
object LabelGroup: TLabel
|
|
Left = 16
|
|
Top = 74
|
|
Width = 68
|
|
Height = 15
|
|
Caption = 'Group Name'
|
|
end
|
|
object LabelUpdateRate: TLabel
|
|
Left = 16
|
|
Top = 103
|
|
Width = 65
|
|
Height = 15
|
|
Caption = 'Update Rate'
|
|
end
|
|
object edtNode: TEdit
|
|
Left = 100
|
|
Top = 13
|
|
Width = 120
|
|
Height = 23
|
|
TabOrder = 0
|
|
Text = 'localhost'
|
|
end
|
|
object cmbSvrName: TComboBox
|
|
Left = 100
|
|
Top = 42
|
|
Width = 200
|
|
Height = 23
|
|
TabOrder = 1
|
|
Text = 'Takebishi.Dxp'
|
|
end
|
|
object edtGroup: TEdit
|
|
Left = 100
|
|
Top = 71
|
|
Width = 120
|
|
Height = 23
|
|
TabOrder = 2
|
|
Text = 'Group1'
|
|
end
|
|
object edtUpdateRate: TEdit
|
|
Left = 100
|
|
Top = 100
|
|
Width = 80
|
|
Height = 23
|
|
TabOrder = 3
|
|
Text = '1000'
|
|
end
|
|
object chkGrpActive: TCheckBox
|
|
Left = 240
|
|
Top = 73
|
|
Width = 60
|
|
Height = 17
|
|
Caption = 'Active'
|
|
Checked = True
|
|
State = cbChecked
|
|
TabOrder = 4
|
|
end
|
|
object btnRefresh: TButton
|
|
Left = 320
|
|
Top = 41
|
|
Width = 75
|
|
Height = 25
|
|
Caption = 'Refresh'
|
|
TabOrder = 5
|
|
OnClick = btnRefreshClick
|
|
end
|
|
object btnConnect: TButton
|
|
Left = 410
|
|
Top = 41
|
|
Width = 75
|
|
Height = 25
|
|
Caption = 'Connect'
|
|
TabOrder = 6
|
|
OnClick = btnConnectClick
|
|
end
|
|
object rdoDA20: TRadioButton
|
|
Left = 240
|
|
Top = 102
|
|
Width = 60
|
|
Height = 17
|
|
Caption = 'DA 2.0'
|
|
Checked = True
|
|
TabOrder = 7
|
|
TabStop = True
|
|
end
|
|
object rdoDA30: TRadioButton
|
|
Left = 320
|
|
Top = 102
|
|
Width = 60
|
|
Height = 17
|
|
Caption = 'DA 3.0'
|
|
TabOrder = 8
|
|
end
|
|
object sgItems: TStringGrid
|
|
Left = 16
|
|
Top = 140
|
|
Width = 600
|
|
Height = 280
|
|
ColCount = 5
|
|
DefaultRowHeight = 24
|
|
FixedCols = 0
|
|
RowCount = 11
|
|
TabOrder = 9
|
|
ColWidths = (
|
|
120
|
|
120
|
|
150
|
|
80
|
|
100)
|
|
end
|
|
object btnAdvise: TButton
|
|
Left = 630
|
|
Top = 140
|
|
Width = 90
|
|
Height = 25
|
|
Caption = 'Advise'
|
|
TabOrder = 10
|
|
OnClick = btnAdviseClick
|
|
end
|
|
object btnRead: TButton
|
|
Left = 630
|
|
Top = 180
|
|
Width = 90
|
|
Height = 25
|
|
Caption = 'Sync Read'
|
|
TabOrder = 11
|
|
OnClick = btnReadClick
|
|
end
|
|
object btnWrite: TButton
|
|
Left = 630
|
|
Top = 220
|
|
Width = 90
|
|
Height = 25
|
|
Caption = 'Sync Write'
|
|
TabOrder = 12
|
|
OnClick = btnWriteClick
|
|
end
|
|
object btnAsyncRead: TButton
|
|
Left = 630
|
|
Top = 260
|
|
Width = 90
|
|
Height = 25
|
|
Caption = 'Async Read'
|
|
TabOrder = 13
|
|
OnClick = btnAsyncReadClick
|
|
end
|
|
object btnAsyncWrite: TButton
|
|
Left = 630
|
|
Top = 300
|
|
Width = 90
|
|
Height = 25
|
|
Caption = 'Async Write'
|
|
TabOrder = 14
|
|
OnClick = btnAsyncWriteClick
|
|
end
|
|
object btnMaxAge: TButton
|
|
Left = 630
|
|
Top = 340
|
|
Width = 90
|
|
Height = 25
|
|
Caption = 'Max Age Read'
|
|
TabOrder = 15
|
|
OnClick = btnMaxAgeClick
|
|
end
|
|
end
|