878 lines
24 KiB
Plaintext
878 lines
24 KiB
Plaintext
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
|