595 lines
14 KiB
Plaintext
595 lines
14 KiB
Plaintext
object F_LSPLCAgent: TF_LSPLCAgent
|
|
Left = 0
|
|
Top = 0
|
|
Caption = 'LS_PLC_Agent02'
|
|
ClientHeight = 657
|
|
ClientWidth = 935
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
OldCreateOrder = False
|
|
OnClose = FormClose
|
|
OnCloseQuery = FormCloseQuery
|
|
OnCreate = FormCreate
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object Splitter1: TSplitter
|
|
Left = 263
|
|
Top = 91
|
|
Width = 5
|
|
Height = 566
|
|
ExplicitLeft = 276
|
|
ExplicitTop = 49
|
|
ExplicitHeight = 656
|
|
end
|
|
object GridAddressList: TcxGrid
|
|
Left = 268
|
|
Top = 91
|
|
Width = 667
|
|
Height = 566
|
|
Align = alClient
|
|
Font.Charset = ANSI_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -12
|
|
Font.Name = #47569#51008' '#44256#46357
|
|
Font.Style = []
|
|
ParentFont = False
|
|
TabOrder = 3
|
|
LookAndFeel.Kind = lfUltraFlat
|
|
LookAndFeel.NativeStyle = False
|
|
LookAndFeel.SkinName = 'DevExpressStyle'
|
|
object GridAddressListTV: TcxGridTableView
|
|
Navigator.Buttons.CustomButtons = <>
|
|
ScrollbarAnnotations.CustomAnnotations = <>
|
|
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoFocusTopRowAfterSorting]
|
|
DataController.Summary.DefaultGroupSummaryItems = <>
|
|
DataController.Summary.FooterSummaryItems = <
|
|
item
|
|
Format = ',0 '#44148
|
|
end>
|
|
DataController.Summary.SummaryGroups = <>
|
|
OptionsBehavior.PostponedSynchronization = False
|
|
OptionsBehavior.FocusCellOnCycle = True
|
|
OptionsCustomize.ColumnsQuickCustomization = True
|
|
OptionsData.Appending = True
|
|
OptionsData.DeletingConfirmation = False
|
|
OptionsData.Inserting = False
|
|
OptionsSelection.MultiSelect = True
|
|
OptionsSelection.CellMultiSelect = True
|
|
OptionsSelection.InvertSelect = False
|
|
OptionsView.NoDataToDisplayInfoText = 'No Data...'
|
|
OptionsView.CellAutoHeight = True
|
|
OptionsView.DataRowHeight = 20
|
|
OptionsView.GroupByBox = False
|
|
OptionsView.HeaderHeight = 20
|
|
OptionsView.Indicator = True
|
|
OptionsView.IndicatorWidth = 10
|
|
object GridAddressListTVColumn1: TcxGridColumn
|
|
Caption = #44396#48516
|
|
HeaderAlignmentHorz = taCenter
|
|
Width = 157
|
|
end
|
|
object GridAddressListTVColumn2: TcxGridColumn
|
|
Caption = 'Address'
|
|
HeaderAlignmentHorz = taCenter
|
|
Width = 100
|
|
end
|
|
object GridAddressListTVColumn3: TcxGridColumn
|
|
Caption = 'DEC'
|
|
FooterAlignmentHorz = taCenter
|
|
HeaderAlignmentHorz = taCenter
|
|
Width = 100
|
|
end
|
|
object GridAddressListTVColumn4: TcxGridColumn
|
|
Caption = 'HEX'
|
|
FooterAlignmentHorz = taCenter
|
|
HeaderAlignmentHorz = taCenter
|
|
Width = 100
|
|
end
|
|
object GridAddressListTVColumn5: TcxGridColumn
|
|
Caption = 'Time'
|
|
FooterAlignmentHorz = taCenter
|
|
HeaderAlignmentHorz = taCenter
|
|
Width = 175
|
|
end
|
|
end
|
|
object GridAddressListLv: TcxGridLevel
|
|
GridView = GridAddressListTV
|
|
end
|
|
end
|
|
object Panel1: TPanel
|
|
Left = 0
|
|
Top = 91
|
|
Width = 263
|
|
Height = 566
|
|
Align = alLeft
|
|
Caption = 'Panel1'
|
|
TabOrder = 4
|
|
DesignSize = (
|
|
263
|
|
566)
|
|
object Splitter2: TSplitter
|
|
Left = 1
|
|
Top = 305
|
|
Width = 261
|
|
Height = 5
|
|
Cursor = crVSplit
|
|
Align = alTop
|
|
ExplicitTop = 185
|
|
ExplicitWidth = 566
|
|
end
|
|
object Memo1: TMemo
|
|
Left = 1
|
|
Top = 1
|
|
Width = 261
|
|
Height = 304
|
|
Align = alTop
|
|
TabOrder = 0
|
|
WordWrap = False
|
|
end
|
|
object Memo2: TMemo
|
|
Left = 1
|
|
Top = 310
|
|
Width = 261
|
|
Height = 255
|
|
Align = alClient
|
|
TabOrder = 1
|
|
WordWrap = False
|
|
end
|
|
object cb_logview: TCheckBox
|
|
Left = 177
|
|
Top = 534
|
|
Width = 74
|
|
Height = 17
|
|
Anchors = [akRight, akBottom]
|
|
Caption = #47196#44536#54869#51064
|
|
TabOrder = 2
|
|
end
|
|
end
|
|
object GroupBox1: TGroupBox
|
|
Left = 0
|
|
Top = 0
|
|
Width = 935
|
|
Height = 91
|
|
Align = alTop
|
|
Caption = 'SETTING'
|
|
TabOrder = 0
|
|
object Label14: TLabel
|
|
Left = 16
|
|
Top = 21
|
|
Width = 31
|
|
Height = 13
|
|
Caption = 'PLC IP'
|
|
end
|
|
object Label15: TLabel
|
|
Left = 16
|
|
Top = 59
|
|
Width = 48
|
|
Height = 13
|
|
Caption = 'PLC PORT'
|
|
end
|
|
object Label1: TLabel
|
|
Left = 277
|
|
Top = 18
|
|
Width = 25
|
|
Height = 13
|
|
Caption = 'sleep'
|
|
end
|
|
object Label2: TLabel
|
|
Left = 456
|
|
Top = 23
|
|
Width = 26
|
|
Height = 13
|
|
Caption = 'Timer'
|
|
end
|
|
object Edit5: TEdit
|
|
Left = 77
|
|
Top = 18
|
|
Width = 97
|
|
Height = 21
|
|
TabOrder = 0
|
|
Text = '192.168.100.11'
|
|
end
|
|
object Edit6: TEdit
|
|
Left = 77
|
|
Top = 56
|
|
Width = 97
|
|
Height = 21
|
|
NumbersOnly = True
|
|
TabOrder = 1
|
|
Text = '2004'
|
|
end
|
|
object Button11: TButton
|
|
Left = 184
|
|
Top = 12
|
|
Width = 69
|
|
Height = 71
|
|
Caption = 'Connect'
|
|
TabOrder = 2
|
|
OnClick = Button11Click
|
|
end
|
|
object Button1: TButton
|
|
Left = 315
|
|
Top = 12
|
|
Width = 106
|
|
Height = 33
|
|
Caption = #44060#48324' Grid Refresh'
|
|
TabOrder = 3
|
|
OnClick = Button1Click
|
|
end
|
|
object Edit1: TEdit
|
|
Left = 277
|
|
Top = 48
|
|
Width = 25
|
|
Height = 21
|
|
NumbersOnly = True
|
|
TabOrder = 4
|
|
Text = '50'
|
|
end
|
|
object Button2: TButton
|
|
Left = 760
|
|
Top = 44
|
|
Width = 137
|
|
Height = 39
|
|
Caption = #49444#51221' '#51200#51109#13#10'('#44396#48516'/address/IP/PORT)'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
TabOrder = 5
|
|
WordWrap = True
|
|
OnClick = Button2Click
|
|
end
|
|
object Button3: TButton
|
|
Left = 864
|
|
Top = 3
|
|
Width = 58
|
|
Height = 22
|
|
Caption = 'grid save'
|
|
TabOrder = 6
|
|
Visible = False
|
|
OnClick = Button3Click
|
|
end
|
|
object Button4: TButton
|
|
Left = 867
|
|
Top = 18
|
|
Width = 58
|
|
Height = 20
|
|
Caption = 'load grid'
|
|
TabOrder = 7
|
|
Visible = False
|
|
OnClick = Button4Click
|
|
end
|
|
object Button5: TButton
|
|
Left = 315
|
|
Top = 50
|
|
Width = 106
|
|
Height = 33
|
|
Caption = #47680#54000' Grid Refresh'
|
|
Enabled = False
|
|
TabOrder = 8
|
|
OnClick = Button5Click
|
|
end
|
|
object Edit2: TEdit
|
|
Left = 450
|
|
Top = 54
|
|
Width = 40
|
|
Height = 21
|
|
NumbersOnly = True
|
|
TabOrder = 9
|
|
Text = '1000'
|
|
end
|
|
object Button6: TButton
|
|
Left = 496
|
|
Top = 12
|
|
Width = 95
|
|
Height = 33
|
|
Caption = 'LOG '#49688#51665' Start'
|
|
TabOrder = 10
|
|
OnClick = Button6Click
|
|
end
|
|
object Button7: TButton
|
|
Left = 496
|
|
Top = 50
|
|
Width = 95
|
|
Height = 33
|
|
Caption = 'LOG '#49688#51665' Stop'
|
|
TabOrder = 11
|
|
OnClick = Button7Click
|
|
end
|
|
object CheckBox1: TCheckBox
|
|
Left = 632
|
|
Top = 58
|
|
Width = 97
|
|
Height = 17
|
|
Caption = #51088#46041#49884#51089
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -19
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
TabOrder = 12
|
|
OnClick = CheckBox1Click
|
|
end
|
|
object RadioButton1: TRadioButton
|
|
Left = 632
|
|
Top = 22
|
|
Width = 49
|
|
Height = 17
|
|
Caption = #44060#48324
|
|
Checked = True
|
|
TabOrder = 13
|
|
TabStop = True
|
|
end
|
|
object RadioButton2: TRadioButton
|
|
Left = 679
|
|
Top = 22
|
|
Width = 44
|
|
Height = 17
|
|
Caption = #47680#54000
|
|
Enabled = False
|
|
TabOrder = 14
|
|
end
|
|
end
|
|
object ListBox1: TListBox
|
|
Left = 279
|
|
Top = 119
|
|
Width = 49
|
|
Height = 538
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -8
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ItemHeight = 10
|
|
Items.Strings = (
|
|
'%MW49'
|
|
'%MW50'
|
|
'%MW51'
|
|
'%MW52'
|
|
'%MW57'
|
|
'%MW58'
|
|
'%MW68'
|
|
'%MW69'
|
|
'%MW85'
|
|
'%MW86'
|
|
'%MW87'
|
|
'%MW88'
|
|
'%MW89'
|
|
'%MW96'
|
|
'%MW97'
|
|
'%MW98'
|
|
'%MW99'
|
|
'%MW100'
|
|
'%MW113'
|
|
'%MW114'
|
|
'%MW115'
|
|
'%MW116'
|
|
'%MW117'
|
|
'%MW118'
|
|
'%MW119'
|
|
'%MW120'
|
|
'%MW121'
|
|
'%MW122'
|
|
'%MW123'
|
|
'%MW124'
|
|
'%MW125'
|
|
'%MW126'
|
|
'%MW127'
|
|
'%MW128'
|
|
'%MW129'
|
|
'%MW130'
|
|
'%MW131'
|
|
'%MW132'
|
|
'%MW133'
|
|
'%MW134'
|
|
'%MW135'
|
|
'%MW136'
|
|
'%MW137'
|
|
'%MW138'
|
|
'%MW139'
|
|
'%MW140'
|
|
'%MW141'
|
|
'%MW142'
|
|
'%MW190'
|
|
'%MW191'
|
|
'%MW192'
|
|
'%MW193')
|
|
ParentFont = False
|
|
TabOrder = 1
|
|
Visible = False
|
|
end
|
|
object ListBox2: TListBox
|
|
Left = 334
|
|
Top = 119
|
|
Width = 124
|
|
Height = 538
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -8
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ItemHeight = 10
|
|
Items.Strings = (
|
|
#47784#45768#53552#47553' '#50728#46020' 1'
|
|
#47784#45768#53552#47553' '#50728#46020' 2'
|
|
#47784#45768#53552#47553' '#50728#46020' 3'
|
|
#47784#45768#53552#47553' '#50517#47141' 1 (CP '#44592#51456')'
|
|
'UP55A-1(PV)'
|
|
'UP55A-1(SV)'
|
|
'UP55A-1(TC '#54788#51116#44050')'
|
|
'UP55A-1(Pyro '#54788#51116#44050')'
|
|
'UP55A-2(PV)'
|
|
'UP55A-2(SV)'
|
|
'UP55A-2('#52636#47141#44050')'
|
|
'UP55A-2(TC '#54788#51116#44050')'
|
|
'UP55A-2(Pyro '#54788#51116#44050')'
|
|
'UP55A-3(PV)'
|
|
'UP55A-3(SV)'
|
|
'UP55A-3('#52636#47141#44050')'
|
|
'UP55A-3(TC '#54788#51116#44050')'
|
|
'UP55A-3(Pyro '#54788#51116#44050')'
|
|
'Chamber_'#45236#48512#50728#46020
|
|
#45257#44033#49688' '#51064#51077' '#50728#46020
|
|
#54788#51116' '#45257#44033#49688' CH01 '#50728#46020
|
|
#54788#51116' '#45257#44033#49688' CH01 '#50976#47049
|
|
#54788#51116' '#45257#44033#49688' CH02 '#50728#46020
|
|
#54788#51116' '#45257#44033#49688' CH02 '#50976#47049
|
|
#54788#51116' '#45257#44033#49688' CH03 '#50728#46020
|
|
#54788#51116' '#45257#44033#49688' CH03 '#50976#47049
|
|
#54788#51116' '#45257#44033#49688' CH04 '#50728#46020
|
|
#54788#51116' '#45257#44033#49688' CH04 '#50976#47049
|
|
#54788#51116' '#45257#44033#49688' CH05 '#50728#46020
|
|
#54788#51116' '#45257#44033#49688' CH05 '#50976#47049
|
|
#54788#51116' '#45257#44033#49688' CH06 '#50728#46020
|
|
#54788#51116' '#45257#44033#49688' CH06 '#50976#47049
|
|
#54788#51116' '#45257#44033#49688' CH07 '#50728#46020
|
|
#54788#51116' '#45257#44033#49688' CH07 '#50976#47049
|
|
#54788#51116' '#45257#44033#49688' CH08 '#50728#46020
|
|
#54788#51116' '#45257#44033#49688' CH08 '#50976#47049
|
|
#54788#51116' '#45257#44033#49688' CH09 '#50728#46020
|
|
#54788#51116' '#45257#44033#49688' CH09 '#50976#47049
|
|
#54788#51116' '#45257#44033#49688' CH10 '#50728#46020
|
|
#54788#51116' '#45257#44033#49688' CH10 '#50976#47049
|
|
#54788#51116' '#45257#44033#49688' CH11 '#50728#46020
|
|
#54788#51116' '#45257#44033#49688' CH11 '#50976#47049
|
|
#54788#51116' '#45257#44033#49688' CH12 '#50728#46020
|
|
#54788#51116' '#45257#44033#49688' CH12 '#50976#47049
|
|
#54788#51116' '#45257#44033#49688' CH13 '#50728#46020
|
|
#54788#51116' '#45257#44033#49688' CH13 '#50976#47049
|
|
#54788#51116' '#45257#44033#49688' CH14 '#50728#46020
|
|
#54788#51116' '#45257#44033#49688' CH14 '#50976#47049
|
|
#51109#48708#44032#46041#49884#44036' (Day)'
|
|
#51109#48708#44032#46041#49884#44036' ('#49884#44036')'
|
|
#51109#48708#44032#46041#49884#44036' ('#48516')'
|
|
#51109#48708#44032#46041#49884#44036' ('#52488')')
|
|
ParentFont = False
|
|
TabOrder = 2
|
|
Visible = False
|
|
end
|
|
object Panel2: TPanel
|
|
Left = 424
|
|
Top = 423
|
|
Width = 369
|
|
Height = 82
|
|
Caption = 'Panel2'
|
|
TabOrder = 5
|
|
Visible = False
|
|
object Label17: TLabel
|
|
Left = 157
|
|
Top = 43
|
|
Width = 38
|
|
Height = 13
|
|
Caption = 'address'
|
|
end
|
|
object Label16: TLabel
|
|
Left = 16
|
|
Top = 43
|
|
Width = 34
|
|
Height = 13
|
|
Caption = 'header'
|
|
end
|
|
object Label3: TLabel
|
|
Left = 16
|
|
Top = 11
|
|
Width = 58
|
|
Height = 13
|
|
Caption = #49688#46041' '#53580#49828#53944
|
|
end
|
|
object ComboBox5: TComboBox
|
|
Left = 53
|
|
Top = 40
|
|
Width = 92
|
|
Height = 21
|
|
ItemIndex = 0
|
|
TabOrder = 0
|
|
Text = '%MW'
|
|
Items.Strings = (
|
|
'%MW'
|
|
'%KW')
|
|
end
|
|
object Button13: TButton
|
|
Left = 264
|
|
Top = 34
|
|
Width = 90
|
|
Height = 33
|
|
Caption = #44060#48324' send'
|
|
TabOrder = 1
|
|
OnClick = Button13Click
|
|
end
|
|
object Edit10: TEdit
|
|
Left = 211
|
|
Top = 40
|
|
Width = 49
|
|
Height = 21
|
|
TabOrder = 2
|
|
Text = '556'
|
|
end
|
|
end
|
|
object ClientSocket1: TClientSocket
|
|
Active = False
|
|
ClientType = ctNonBlocking
|
|
Port = 0
|
|
OnConnecting = ClientSocket1Connecting
|
|
OnConnect = ClientSocket1Connect
|
|
OnDisconnect = ClientSocket1Disconnect
|
|
OnRead = ClientSocket1Read
|
|
OnError = ClientSocket1Error
|
|
Left = 88
|
|
Top = 208
|
|
end
|
|
object Tmr_PLCRead: TTimer
|
|
Enabled = False
|
|
OnTimer = Tmr_PLCReadTimer
|
|
Left = 488
|
|
Top = 147
|
|
end
|
|
object TrayIcon1: TTrayIcon
|
|
OnClick = TrayIcon1Click
|
|
Left = 715
|
|
Top = 161
|
|
end
|
|
object tmrExit: TTimer
|
|
Enabled = False
|
|
Interval = 100
|
|
OnTimer = tmrExitTimer
|
|
Left = 805
|
|
Top = 162
|
|
end
|
|
object FDConnection1: TFDConnection
|
|
Left = 508
|
|
Top = 280
|
|
end
|
|
object FDQuery1: TFDQuery
|
|
Connection = FDConnection1
|
|
Left = 596
|
|
Top = 284
|
|
end
|
|
object FDPhysPgDriverLink1: TFDPhysPgDriverLink
|
|
Left = 704
|
|
Top = 280
|
|
end
|
|
object FDGUIxWaitCursor1: TFDGUIxWaitCursor
|
|
Provider = 'Forms'
|
|
Left = 824
|
|
Top = 284
|
|
end
|
|
object Tmr_DBInsert: TTimer
|
|
Enabled = False
|
|
OnTimer = Tmr_DBInsertTimer
|
|
Left = 592
|
|
Top = 144
|
|
end
|
|
object FDQuery2: TFDQuery
|
|
Connection = FDConnection1
|
|
Left = 508
|
|
Top = 356
|
|
end
|
|
end
|