127 lines
2.2 KiB
Plaintext
127 lines
2.2 KiB
Plaintext
object fOPCClient: TfOPCClient
|
|
Left = 0
|
|
Top = 0
|
|
Caption = 'OPC Client Sample'
|
|
ClientHeight = 513
|
|
ClientWidth = 362
|
|
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 Label5: TLabel
|
|
Left = 16
|
|
Top = 12
|
|
Width = 67
|
|
Height = 15
|
|
Caption = 'Server Name'
|
|
end
|
|
object Label1: TLabel
|
|
Left = 16
|
|
Top = 168
|
|
Width = 59
|
|
Height = 15
|
|
Caption = 'Item Name'
|
|
end
|
|
object Label2: TLabel
|
|
Left = 112
|
|
Top = 168
|
|
Width = 28
|
|
Height = 15
|
|
Caption = 'Value'
|
|
end
|
|
object Label3: TLabel
|
|
Left = 168
|
|
Top = 168
|
|
Width = 56
|
|
Height = 15
|
|
Caption = 'Date/Time'
|
|
end
|
|
object Label4: TLabel
|
|
Left = 304
|
|
Top = 168
|
|
Width = 38
|
|
Height = 15
|
|
Caption = 'Quality'
|
|
end
|
|
object txtSvrName: TEdit
|
|
Left = 96
|
|
Top = 8
|
|
Width = 136
|
|
Height = 23
|
|
TabOrder = 0
|
|
Text = 'Takebishi.Dxp.7'
|
|
end
|
|
object btnConnect: TButton
|
|
Left = 16
|
|
Top = 48
|
|
Width = 104
|
|
Height = 32
|
|
Caption = 'Connect'
|
|
TabOrder = 1
|
|
OnClick = btnConnectClick
|
|
end
|
|
object btnRead: TButton
|
|
Left = 128
|
|
Top = 48
|
|
Width = 104
|
|
Height = 32
|
|
Caption = 'Read'
|
|
Enabled = False
|
|
TabOrder = 2
|
|
OnClick = btnReadClick
|
|
end
|
|
object btnWrite: TButton
|
|
Left = 240
|
|
Top = 48
|
|
Width = 104
|
|
Height = 32
|
|
Caption = 'Write'
|
|
Enabled = False
|
|
TabOrder = 3
|
|
OnClick = btnWriteClick
|
|
end
|
|
object btnAdvise: TButton
|
|
Left = 16
|
|
Top = 120
|
|
Width = 104
|
|
Height = 32
|
|
Caption = 'Advise'
|
|
Enabled = False
|
|
TabOrder = 4
|
|
OnClick = btnAdviseClick
|
|
end
|
|
object btnAsyncRead: TButton
|
|
Left = 128
|
|
Top = 120
|
|
Width = 104
|
|
Height = 32
|
|
Caption = 'Async Read'
|
|
Enabled = False
|
|
TabOrder = 5
|
|
OnClick = btnAsyncReadClick
|
|
end
|
|
object btnAsyncWrite: TButton
|
|
Left = 240
|
|
Top = 120
|
|
Width = 104
|
|
Height = 32
|
|
Caption = 'Async Write'
|
|
Enabled = False
|
|
TabOrder = 6
|
|
OnClick = btnAsyncWriteClick
|
|
end
|
|
object txtUpdateRate: TEdit
|
|
Left = 16
|
|
Top = 88
|
|
Width = 65
|
|
Height = 23
|
|
TabOrder = 7
|
|
Text = '1000'
|
|
end
|
|
end
|