jhw/SmartFactory_NEOL
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
c588dc4b82
SmartFactory_NEOL/SOURCE/NEOL-LS_PLC_Agent01_20251106/U_LSPLCAgent.dfm
jhw c588dc4b82 first upload
2026-09-04 14:06:10 +09:00

669 lines
15 KiB
Plaintext
Raw Blame History

object F_LSPLCAgent: TF_LSPLCAgent
Left = 0
Top = 0
Caption = 'LS_PLC_Agent01'
ClientHeight = 657
ClientWidth = 914
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 = 646
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'
ExplicitWidth = 645
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
object GridAddressListTVColumn6: TcxGridColumn
Visible = False
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 = 914
Height = 91
Align = alTop
Caption = 'SETTING'
TabOrder = 0
ExplicitWidth = 913
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'
Enabled = False
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 = 277
Top = 118
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 = 332
Top = 118
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 ListBox3: TListBox
Left = 462
Top = 118
Width = 59
Height = 538
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -8
Font.Name = 'Tahoma'
Font.Style = []
ItemHeight = 10
Items.Strings = (
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD'
'WORD')
ParentFont = False
TabOrder = 6
Visible = False
end
object Panel2: TPanel
Left = 537
Top = 447
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_old: TClientSocket
Active = False
ClientType = ctNonBlocking
Port = 0
OnConnecting = ClientSocket1_oldConnecting
OnConnect = ClientSocket1_oldConnect
OnDisconnect = ClientSocket1_oldDisconnect
OnRead = ClientSocket1_oldRead
OnError = ClientSocket1_oldError
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
Reference in New Issue View Git Blame Copy Permalink