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