object frmLsPlcMain: TfrmLsPlcMain Left = 0 Top = 0 Caption = 'LS PLC TEST' ClientHeight = 696 ClientWidth = 818 Color = clBtnFace Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #44404#47548#52404 Font.Style = [] KeyPreview = True OldCreateOrder = False Position = poMainFormCenter OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnKeyDown = FormKeyDown OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object StatusBar1: TStatusBar Left = 0 Top = 677 Width = 818 Height = 19 Panels = <> end object PageControl2: TPageControl Left = 0 Top = 0 Width = 818 Height = 677 ActivePage = TabSheet7 Align = alClient TabOrder = 1 object TabSheet7: TTabSheet Caption = 'LOG' ImageIndex = 3 object PageControl1: TPageControl Left = 0 Top = 137 Width = 810 Height = 511 ActivePage = TabSheet2 Align = alClient TabOrder = 0 object TabSheet1: TTabSheet Caption = 'TEXT' object Splitter2: TSplitter Left = 397 Top = 0 Width = 9 Height = 482 ExplicitHeight = 381 end object Panel5: TPanel Left = 0 Top = 0 Width = 397 Height = 482 Align = alLeft BevelOuter = bvNone TabOrder = 0 object Splitter1: TSplitter Left = 0 Top = 201 Width = 397 Height = 8 Cursor = crVSplit Align = alTop ExplicitTop = 145 end object Memo1: TMemo Left = 0 Top = 0 Width = 397 Height = 201 Align = alTop Lines.Strings = ( 'Memo1') ScrollBars = ssVertical TabOrder = 0 end object Memo2: TMemo Left = 0 Top = 209 Width = 397 Height = 273 Align = alClient Lines.Strings = ( 'Memo2') ScrollBars = ssVertical TabOrder = 1 end end object Panel6: TPanel Left = 406 Top = 0 Width = 396 Height = 482 Align = alClient BevelOuter = bvNone TabOrder = 1 object Memo3: TMemo Left = 0 Top = 0 Width = 396 Height = 482 Align = alClient Lines.Strings = ( 'Memo3') ScrollBars = ssVertical TabOrder = 0 end end end object TabSheet2: TTabSheet Caption = 'PLC VIEWER' ImageIndex = 1 object StringGrid1: TStringGrid Left = 0 Top = 0 Width = 802 Height = 482 Align = alClient ColCount = 11 DefaultColWidth = 68 DefaultRowHeight = 19 RowCount = 21 Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing, goEditing, goFixedRowDefAlign] PopupMenu = PopupMenu1 TabOrder = 0 OnClick = StringGrid1Click ColWidths = ( 68 68 68 68 68 68 68 68 68 68 68) end object StringGrid2: TStringGrid Left = 250 Top = 41 Width = 249 Height = 409 ColCount = 3 DefaultColWidth = 80 DefaultRowHeight = 19 FixedCols = 0 RowCount = 2 Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing, goRowSelect, goFixedRowDefAlign] PopupMenu = PopupMenu2 TabOrder = 1 end end object TabSheet3: TTabSheet Caption = 'LOG' ImageIndex = 2 object Splitter4: TSplitter Left = 338 Top = 0 Height = 482 ExplicitLeft = 428 ExplicitTop = 236 ExplicitHeight = 100 end object StringGrid3: TStringGrid Left = 341 Top = 0 Width = 461 Height = 482 Align = alClient ColCount = 4 DefaultColWidth = 147 DefaultRowHeight = 19 FixedCols = 0 RowCount = 2 Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing, goRowSelect, goFixedRowDefAlign] TabOrder = 0 ColWidths = ( 116 121 102 79) end object Memo4: TMemo Left = 0 Top = 0 Width = 338 Height = 482 Align = alLeft Lines.Strings = ( 'Memo4') TabOrder = 1 end end end object Panel1: TPanel Left = 0 Top = 0 Width = 810 Height = 137 Align = alTop BevelKind = bkFlat BevelOuter = bvNone TabOrder = 1 object GroupBox1: TGroupBox Left = 0 Top = 0 Width = 340 Height = 133 Align = alLeft TabOrder = 0 object GroupBox12: TGroupBox Left = 83 Top = 66 Width = 60 Height = 57 Caption = 'TIMER' TabOrder = 0 object Edit1: TEdit Left = 6 Top = 23 Width = 47 Height = 21 TabOrder = 0 Text = '250' OnKeyDown = Edit1KeyDown end end object GroupBox11: TGroupBox Left = 153 Top = 66 Width = 176 Height = 57 Caption = 'LOG '#49688#51665 TabOrder = 1 object BitBtn7: TBitBtn Left = 10 Top = 21 Width = 75 Height = 25 Caption = #49884#51089 TabOrder = 0 OnClick = BitBtn7Click end object BitBtn8: TBitBtn Left = 91 Top = 21 Width = 75 Height = 25 Caption = #51221#51648 TabOrder = 1 OnClick = BitBtn8Click end end object CheckBox1: TCheckBox Left = 19 Top = 91 Width = 58 Height = 17 Caption = 'VIEW' Checked = True State = cbChecked TabOrder = 2 end object BitBtn9: TBitBtn Left = 83 Top = 20 Width = 115 Height = 33 Caption = 'DB '#51217#49549 TabOrder = 3 OnClick = BitBtn9Click end object BitBtn10: TBitBtn Left = 204 Top = 20 Width = 115 Height = 33 Caption = 'DB '#45130#44592 TabOrder = 4 OnClick = BitBtn10Click end end object GroupBox6: TGroupBox Left = 340 Top = 0 Width = 466 Height = 133 Align = alClient Caption = 'TEST' TabOrder = 1 object GroupBox5: TGroupBox Left = 6 Top = 15 Width = 81 Height = 51 Caption = 'TIMER' TabOrder = 0 object Edit5: TEdit Left = 10 Top = 19 Width = 55 Height = 21 TabOrder = 0 Text = '500' OnKeyDown = Edit5KeyDown end end object GroupBox2: TGroupBox Left = 6 Top = 72 Width = 81 Height = 51 Caption = 'HEADER' TabOrder = 1 object ComboBox1: TComboBox Left = 10 Top = 21 Width = 55 Height = 21 ItemIndex = 0 TabOrder = 0 Text = '%MW' OnChange = ComboBox1Change OnCloseUp = ComboBox1CloseUp Items.Strings = ( '%MW' '%KW') end end object GroupBox3: TGroupBox Left = 93 Top = 15 Width = 177 Height = 51 Caption = #44060#48324' ADDRESS' TabOrder = 2 object Edit2: TEdit Left = 10 Top = 20 Width = 75 Height = 21 TabOrder = 0 Text = '556' OnKeyDown = Edit2KeyDown end object BitBtn4: TBitBtn Left = 92 Top = 18 Width = 75 Height = 25 Caption = 'Send' TabOrder = 1 OnClick = BitBtn4Click end end object GroupBox4: TGroupBox Left = 276 Top = 15 Width = 177 Height = 95 Caption = #50672#49549' ADDRESS' TabOrder = 3 object Label1: TLabel Left = 84 Top = 24 Width = 7 Height = 13 Caption = '~' end object SpeedButton1: TSpeedButton Left = 10 Top = 19 Width = 23 Height = 22 Caption = '<' OnClick = SpeedButton1Click end object SpeedButton2: TSpeedButton Left = 144 Top = 19 Width = 23 Height = 22 Caption = '>' OnClick = SpeedButton2Click end object Edit3: TEdit Left = 36 Top = 20 Width = 45 Height = 21 TabOrder = 0 Text = '550' OnKeyDown = Edit3KeyDown end object Edit4: TEdit Left = 95 Top = 20 Width = 45 Height = 21 TabOrder = 1 Text = '560' OnKeyDown = Edit4KeyDown end object BitBtn5: TBitBtn Left = 10 Top = 47 Width = 75 Height = 25 Caption = 'Start' TabOrder = 2 OnClick = BitBtn5Click end object BitBtn6: TBitBtn Left = 92 Top = 47 Width = 75 Height = 25 Caption = 'Stop' TabOrder = 3 OnClick = BitBtn6Click end end end end end object TabSheet4: TTabSheet Caption = 'PLC SETTING' object GridMachineList: TcxGrid Left = 0 Top = 0 Width = 511 Height = 648 Align = alLeft Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #47569#51008' '#44256#46357 Font.Style = [] ParentFont = False TabOrder = 1 LookAndFeel.Kind = lfUltraFlat LookAndFeel.NativeStyle = False LookAndFeel.SkinName = 'DevExpressStyle' object GridMachineListTV: TcxGridTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> OnFocusedRecordChanged = GridMachineListTVFocusedRecordChanged 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.Deleting = False OptionsData.DeletingConfirmation = False OptionsData.Editing = False OptionsData.Inserting = False OptionsSelection.CellSelect = False OptionsSelection.MultiSelect = True OptionsView.NoDataToDisplayInfoText = 'No Data...' OptionsView.CellAutoHeight = True OptionsView.DataRowHeight = 25 OptionsView.GroupByBox = False OptionsView.HeaderHeight = 25 OptionsView.Indicator = True OptionsView.IndicatorWidth = 10 object GridMachineListTVColumn1: TcxGridColumn Caption = #49444#48708#44396#48516 HeaderAlignmentHorz = taCenter Width = 80 end object GridMachineListTVColumn2: TcxGridColumn Caption = #54840#44592#47749 HeaderAlignmentHorz = taCenter Width = 80 end object GridMachineListTVColumn3: TcxGridColumn Caption = #54840#44592#48264#54840 HeaderAlignmentHorz = taCenter Width = 80 end object GridMachineListTVColumn4: TcxGridColumn Caption = 'IP' HeaderAlignmentHorz = taCenter Width = 150 end object GridMachineListTVColumn5: TcxGridColumn Caption = 'PORT' HeaderAlignmentHorz = taCenter Width = 80 end end object GridMachineListLv: TcxGridLevel GridView = GridMachineListTV end end object GroupBox10: TGroupBox Left = 511 Top = 0 Width = 299 Height = 648 Align = alClient Caption = 'PLC SETTING' TabOrder = 0 object LabeledEdit4: TLabeledEdit Left = 20 Top = 173 Width = 150 Height = 21 EditLabel.Width = 56 EditLabel.Height = 13 EditLabel.Caption = #54840#44592#48264#54840 TabOrder = 0 OnKeyDown = LabeledEdit4KeyDown end object LabeledEdit1: TLabeledEdit Left = 20 Top = 221 Width = 150 Height = 21 EditLabel.Width = 14 EditLabel.Height = 13 EditLabel.Caption = 'IP' TabOrder = 1 OnKeyDown = LabeledEdit1KeyDown end object LabeledEdit2: TLabeledEdit Left = 20 Top = 269 Width = 150 Height = 21 EditLabel.Width = 28 EditLabel.Height = 13 EditLabel.Caption = 'PORT' TabOrder = 2 OnKeyDown = LabeledEdit2KeyDown end object BitBtn1: TBitBtn Left = 20 Top = 307 Width = 70 Height = 39 Caption = 'CONN' TabOrder = 3 OnClick = BitBtn1Click end object BitBtn3: TBitBtn Left = 100 Top = 307 Width = 70 Height = 39 Caption = 'Disconn' TabOrder = 4 OnClick = BitBtn3Click end object LabeledEdit3: TLabeledEdit Left = 20 Top = 125 Width = 150 Height = 21 EditLabel.Width = 42 EditLabel.Height = 13 EditLabel.Caption = #54840#44592#47749 TabOrder = 5 OnKeyDown = LabeledEdit3KeyDown end object BitBtn11: TBitBtn Left = 100 Top = 23 Width = 70 Height = 34 Caption = #52628#44032 Enabled = False TabOrder = 6 Visible = False end object LabeledEdit5: TLabeledEdit Left = 20 Top = 77 Width = 150 Height = 21 EditLabel.Width = 56 EditLabel.Height = 13 EditLabel.Caption = #49444#48708#44396#48516 TabOrder = 7 OnKeyDown = LabeledEdit3KeyDown end end end object TabSheet5: TTabSheet Caption = 'ADDRESS SETTING' ImageIndex = 1 object cxGrid1: TcxGrid Left = 0 Top = 0 Width = 633 Height = 648 Align = alLeft Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #47569#51008' '#44256#46357 Font.Style = [] ParentFont = False PopupMenu = PopupMenu2 TabOrder = 0 LookAndFeel.Kind = lfUltraFlat LookAndFeel.NativeStyle = False LookAndFeel.SkinName = 'DevExpressStyle' object cxGridTableView1: TcxGridTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> OnFocusedRecordChanged = cxGridTableView1FocusedRecordChanged 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.Deleting = False OptionsData.DeletingConfirmation = False OptionsData.Editing = False OptionsData.Inserting = False OptionsSelection.CellSelect = False OptionsSelection.MultiSelect = True OptionsView.NoDataToDisplayInfoText = 'No Data...' OptionsView.CellAutoHeight = True OptionsView.DataRowHeight = 25 OptionsView.GroupByBox = False OptionsView.HeaderHeight = 25 OptionsView.Indicator = True OptionsView.IndicatorWidth = 10 object cxGridTableView1Column1: TcxGridColumn Caption = #49444#48708#44396#48516 HeaderAlignmentHorz = taCenter Width = 100 end object cxGridTableView1Column2: TcxGridColumn Caption = #54840#44592#47749 HeaderAlignmentHorz = taCenter Width = 100 end object cxGridTableView1Column3: TcxGridColumn Caption = #54840#44592#48264#54840 HeaderAlignmentHorz = taCenter Width = 100 end object cxGridTableView1Column4: TcxGridColumn Caption = #47749#52845 HeaderAlignmentHorz = taCenter Width = 100 end object cxGridTableView1Column5: TcxGridColumn Caption = 'Address' HeaderAlignmentHorz = taCenter Width = 100 end object cxGridTableView1Column6: TcxGridColumn Caption = #48708#44256 HeaderAlignmentHorz = taCenter Width = 100 end end object cxGridLevel1: TcxGridLevel GridView = cxGridTableView1 end end object LabeledEdit11: TLabeledEdit Left = 652 Top = 125 Width = 150 Height = 21 EditLabel.Width = 56 EditLabel.Height = 13 EditLabel.Caption = #54840#44592#48264#54840 TabOrder = 1 OnKeyDown = LabeledEdit4KeyDown end object LabeledEdit12: TLabeledEdit Left = 652 Top = 77 Width = 150 Height = 21 EditLabel.Width = 42 EditLabel.Height = 13 EditLabel.Caption = #54840#44592#47749 TabOrder = 2 OnKeyDown = LabeledEdit3KeyDown end object LabeledEdit13: TLabeledEdit Left = 652 Top = 29 Width = 150 Height = 21 EditLabel.Width = 56 EditLabel.Height = 13 EditLabel.Caption = #49444#48708#44396#48516 TabOrder = 3 OnKeyDown = LabeledEdit3KeyDown end object LabeledEdit14: TLabeledEdit Left = 652 Top = 269 Width = 150 Height = 21 EditLabel.Width = 28 EditLabel.Height = 13 EditLabel.Caption = #48708#44256 TabOrder = 4 OnKeyDown = LabeledEdit4KeyDown end object LabeledEdit15: TLabeledEdit Left = 652 Top = 221 Width = 150 Height = 21 EditLabel.Width = 49 EditLabel.Height = 13 EditLabel.Caption = 'Address' TabOrder = 5 OnKeyDown = LabeledEdit3KeyDown end object LabeledEdit16: TLabeledEdit Left = 652 Top = 173 Width = 150 Height = 21 EditLabel.Width = 28 EditLabel.Height = 13 EditLabel.Caption = #47749#52845 TabOrder = 6 OnKeyDown = LabeledEdit3KeyDown end end object TabSheet6: TTabSheet Caption = 'DATABASE SETTING' ImageIndex = 2 object LabeledEdit6: TLabeledEdit Left = 18 Top = 34 Width = 150 Height = 21 EditLabel.Width = 49 EditLabel.Height = 13 EditLabel.Caption = 'DB Name' TabOrder = 0 Text = 'neol_db' OnKeyDown = LabeledEdit6KeyDown end object LabeledEdit7: TLabeledEdit Left = 18 Top = 82 Width = 150 Height = 21 EditLabel.Width = 28 EditLabel.Height = 13 EditLabel.Caption = 'User' TabOrder = 1 Text = 'qsentech' OnKeyDown = LabeledEdit7KeyDown end object LabeledEdit8: TLabeledEdit Left = 18 Top = 132 Width = 150 Height = 21 EditLabel.Width = 56 EditLabel.Height = 13 EditLabel.Caption = 'Password' TabOrder = 2 Text = 'qsentech!1233' OnKeyDown = LabeledEdit8KeyDown end object LabeledEdit9: TLabeledEdit Left = 18 Top = 186 Width = 150 Height = 21 EditLabel.Width = 42 EditLabel.Height = 13 EditLabel.Caption = 'Server' TabOrder = 3 Text = 'qst-s.iptime.org' OnKeyDown = LabeledEdit9KeyDown end object LabeledEdit10: TLabeledEdit Left = 18 Top = 234 Width = 150 Height = 21 EditLabel.Width = 28 EditLabel.Height = 13 EditLabel.Caption = 'Port' TabOrder = 4 Text = '33063' OnKeyDown = LabeledEdit10KeyDown end end end object ClientSocket1: TClientSocket Active = False ClientType = ctNonBlocking Port = 0 OnConnecting = ClientSocket1Connecting OnDisconnect = ClientSocket1Disconnect OnRead = ClientSocket1Read OnError = ClientSocket1Error Left = 32 Top = 24 end object Timer1: TTimer Enabled = False OnTimer = Timer1Timer Left = 136 Top = 396 end object PopupMenu1: TPopupMenu Left = 28 Top = 206 object N1: TMenuItem Caption = 'Address '#46321#47197 OnClick = N1Click end end object PopupMenu2: TPopupMenu Left = 28 Top = 498 object Address1: TMenuItem Caption = 'Address '#54200#51665 OnClick = Address1Click end object N2: TMenuItem Caption = '-' end object Address2: TMenuItem Caption = 'Address '#49325#51228 OnClick = Address2Click end end object Timer2: TTimer OnTimer = Timer2Timer Left = 24 Top = 392 end object FDConnection1: TFDConnection Left = 24 Top = 304 end object FDQuery1: TFDQuery Connection = FDConnection1 Left = 104 Top = 304 end object FDPhysMySQLDriverLink1: TFDPhysMySQLDriverLink Left = 208 Top = 304 end end