457 lines
11 KiB
ObjectPascal
457 lines
11 KiB
ObjectPascal
object PolicyEditForm: TPolicyEditForm
|
|
Left = 0
|
|
Top = 0
|
|
BorderStyle = bsDialog
|
|
Caption = #31574#30053#32534#36753
|
|
ClientHeight = 457
|
|
ClientWidth = 448
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -12
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
Position = poMainFormCenter
|
|
OnClose = FormClose
|
|
OnCreate = FormCreate
|
|
OnMouseMove = FormMouseMove
|
|
TextHeight = 15
|
|
object m_lblPolicy: TLabel
|
|
Left = 22
|
|
Top = 41
|
|
Width = 65
|
|
Height = 23
|
|
AutoSize = False
|
|
Caption = #32534#36753#25171#27861#65306
|
|
Layout = tlCenter
|
|
end
|
|
object m_cbPolicy: TComboBox
|
|
Left = 87
|
|
Top = 41
|
|
Width = 165
|
|
Height = 23
|
|
AutoDropDown = True
|
|
AutoCloseUp = True
|
|
DropDownCount = 20
|
|
DropDownWidth = 200
|
|
TabOrder = 0
|
|
Text = #35831#36873#25321#25171#27861
|
|
OnChange = OnPolicyChange
|
|
end
|
|
object m_btnAdd: TButton
|
|
Left = 271
|
|
Top = 41
|
|
Width = 75
|
|
Height = 23
|
|
Caption = #26032#24314
|
|
TabOrder = 1
|
|
OnClick = OnAddClick
|
|
end
|
|
object m_panEdit: TPanel
|
|
Left = 21
|
|
Top = 75
|
|
Width = 408
|
|
Height = 344
|
|
BevelKind = bkFlat
|
|
BevelOuter = bvNone
|
|
TabOrder = 2
|
|
OnMouseMove = FormMouseMove
|
|
object m_bvChip: TBevel
|
|
Left = 0
|
|
Top = 0
|
|
Width = 405
|
|
Height = 55
|
|
ParentCustomHint = False
|
|
ParentShowHint = False
|
|
Shape = bsFrame
|
|
ShowHint = False
|
|
end
|
|
object m_btnDelRow: TButton
|
|
Left = 4
|
|
Top = 313
|
|
Width = 80
|
|
Height = 25
|
|
Caption = #21024#38500#34892
|
|
Enabled = False
|
|
TabOrder = 1
|
|
OnClick = OnDelRowClick
|
|
end
|
|
object m_btnSave: TButton
|
|
Left = 201
|
|
Top = 313
|
|
Width = 88
|
|
Height = 25
|
|
Caption = #20445#23384#25171#27861
|
|
Enabled = False
|
|
TabOrder = 2
|
|
OnClick = OnSaveClick
|
|
end
|
|
object m_btnSelect: TButton
|
|
Left = 297
|
|
Top = 313
|
|
Width = 103
|
|
Height = 25
|
|
Caption = #36873#25321#35813#25171#27861
|
|
TabOrder = 3
|
|
OnClick = OnSelectClick
|
|
end
|
|
object m_sg: TStringGrid
|
|
Left = 0
|
|
Top = 55
|
|
Width = 404
|
|
Height = 256
|
|
ParentCustomHint = False
|
|
BevelInner = bvNone
|
|
BevelOuter = bvNone
|
|
ColCount = 4
|
|
DefaultColWidth = 99
|
|
DefaultDrawing = False
|
|
DoubleBuffered = True
|
|
DrawingStyle = gdsGradient
|
|
FixedCols = 0
|
|
RowCount = 10
|
|
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goEditing, goRowSelect, goThumbTracking]
|
|
ParentDoubleBuffered = False
|
|
ParentShowHint = False
|
|
PopupMenu = m_pmSG
|
|
ScrollBars = ssVertical
|
|
ShowHint = False
|
|
TabOrder = 5
|
|
OnDrawCell = SGDrawCell
|
|
OnKeyDown = SGKeyDown
|
|
OnMouseDown = SGMouseDown
|
|
OnMouseMove = FormMouseMove
|
|
OnMouseWheelDown = SGMouseWheelDown
|
|
OnMouseWheelUp = SGMouseWheelUp
|
|
OnSelectCell = SGSelectCell
|
|
OnTopLeftChanged = SGTopLeftChanged
|
|
DefaultTextDrawing = False
|
|
end
|
|
object m_pEditor: TEdit
|
|
Left = 96
|
|
Top = 83
|
|
Width = 97
|
|
Height = 23
|
|
ParentCustomHint = False
|
|
AutoSize = False
|
|
BevelInner = bvNone
|
|
BevelOuter = bvNone
|
|
Ctl3D = True
|
|
ParentCtl3D = False
|
|
ParentShowHint = False
|
|
ShowHint = False
|
|
TabOrder = 4
|
|
Visible = False
|
|
OnExit = EditorExit
|
|
OnKeyDown = EditorKeyDown
|
|
OnKeyPress = EditorKeyPress
|
|
end
|
|
object m_rgRoad: TRadioGroup
|
|
Left = 10
|
|
Top = 1
|
|
Width = 380
|
|
Height = 48
|
|
Align = alCustom
|
|
Color = clBtnFace
|
|
Columns = 5
|
|
Ctl3D = True
|
|
ItemIndex = 0
|
|
Items.Strings = (
|
|
#29664' '#30424
|
|
#22823' '#36335
|
|
#22823#30524#36335
|
|
#23567' '#36335
|
|
#23567#24378#36335)
|
|
ParentBackground = False
|
|
ParentColor = False
|
|
ParentCtl3D = False
|
|
ShowFrame = False
|
|
TabOrder = 7
|
|
OnClick = OnRoadClick
|
|
end
|
|
object m_panChip: TPanel
|
|
Left = 0
|
|
Top = 0
|
|
Width = 404
|
|
Height = 54
|
|
Align = alTop
|
|
BevelOuter = bvNone
|
|
Ctl3D = True
|
|
ParentCtl3D = False
|
|
TabOrder = 6
|
|
OnClick = OnDeadClick
|
|
OnMouseMove = FormMouseMove
|
|
object m_lblDead: TLabel
|
|
Left = 17
|
|
Top = 32
|
|
Width = 39
|
|
Height = 15
|
|
Caption = #29190#32518#65306
|
|
end
|
|
object Bevel1: TBevel
|
|
Left = 16
|
|
Top = 26
|
|
Width = 375
|
|
Height = 2
|
|
end
|
|
object m_rgDead: TGroupBox
|
|
Left = 64
|
|
Top = 30
|
|
Width = 330
|
|
Height = 19
|
|
ShowFrame = False
|
|
TabOrder = 0
|
|
object m_lblDead2Tail: TLabel
|
|
Left = 240
|
|
Top = 3
|
|
Width = 65
|
|
Height = 15
|
|
Caption = #20998#38047#21518#37325#21551
|
|
end
|
|
object m_rbDead0: TRadioButton
|
|
Left = 8
|
|
Top = 2
|
|
Width = 50
|
|
Height = 17
|
|
Hint = #20572#27490#19979#27880
|
|
Caption = #20572#27490
|
|
Checked = True
|
|
TabOrder = 0
|
|
TabStop = True
|
|
OnClick = OnDeadClick
|
|
end
|
|
object m_rbDead1: TRadioButton
|
|
Tag = 1
|
|
Left = 71
|
|
Top = 2
|
|
Width = 81
|
|
Height = 17
|
|
Hint = #26412#23616#26242#20572#65292#26032#23616#37325#26032#24320#22987
|
|
Caption = #26032#23616#37325#21551
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 1
|
|
OnClick = OnDeadClick
|
|
end
|
|
object m_rbDead2: TRadioButton
|
|
Tag = 2
|
|
Left = 163
|
|
Top = 2
|
|
Width = 50
|
|
Height = 17
|
|
Hint = #26242#20572#21518#37325#21551
|
|
Caption = #26242#20572
|
|
TabOrder = 2
|
|
OnClick = OnDeadClick
|
|
end
|
|
object m_edDeadPause: TEdit
|
|
Left = 213
|
|
Top = 0
|
|
Width = 23
|
|
Height = 19
|
|
Hint = '0-15'#20998#38047
|
|
Alignment = taCenter
|
|
AutoSize = False
|
|
MaxLength = 2
|
|
NumbersOnly = True
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 3
|
|
Text = '0'
|
|
TextHint = '0-30'
|
|
OnExit = DeadPauseExit
|
|
OnKeyDown = DeadPauseKeyDown
|
|
end
|
|
end
|
|
object m_cbKind: TComboBox
|
|
Left = 17
|
|
Top = 2
|
|
Width = 80
|
|
Height = 23
|
|
AutoComplete = False
|
|
Style = csDropDownList
|
|
ItemIndex = 0
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 3
|
|
Text = #24120#35268#27880#30721
|
|
OnChange = OnKindChange
|
|
Items.Strings = (
|
|
#24120#35268#27880#30721
|
|
#23618#32423#27880#30721
|
|
#38454#26799#27880#30721
|
|
#32452#21512#38454#26799
|
|
#36194#36755#27425#24046)
|
|
end
|
|
object m_cbLevelTotalDiff: TCheckBox
|
|
Left = 116
|
|
Top = 5
|
|
Width = 78
|
|
Height = 17
|
|
Hint = #21246#36873#26102#25353#24635#20307#35745#31639#36755#36194#65292#21542#21017#21488#26700#21508#33258#35745#31639#36755#36194
|
|
Caption = #24635#20307#35745#31639
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 4
|
|
Visible = False
|
|
OnClick = OnChipOptionClick
|
|
end
|
|
object m_cbLevelInstant: TCheckBox
|
|
Left = 210
|
|
Top = 5
|
|
Width = 78
|
|
Height = 17
|
|
Caption = #21363#26102#21319#38477
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 5
|
|
Visible = False
|
|
OnClick = OnChipOptionClick
|
|
end
|
|
object m_cbLevelIndie: TCheckBox
|
|
Left = 304
|
|
Top = 5
|
|
Width = 78
|
|
Height = 17
|
|
Caption = #21319#38477#28165#38646
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 6
|
|
Visible = False
|
|
OnClick = OnChipOptionClick
|
|
end
|
|
object m_cbTierAccChip: TCheckBox
|
|
Left = 228
|
|
Top = 5
|
|
Width = 92
|
|
Height = 17
|
|
Hint = #27599#23618#20928#36755#20540'('#19981#35745#36180#29575')'#32047#21152#33267#20197#21518#21508#23618#27880#30721
|
|
Caption = #20928#36755#20540#32047#21152
|
|
Checked = True
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
State = cbChecked
|
|
TabOrder = 2
|
|
Visible = False
|
|
OnClick = OnChipOptionClick
|
|
end
|
|
object m_cbTierWinRet: TCheckBox
|
|
Left = 116
|
|
Top = 5
|
|
Width = 105
|
|
Height = 17
|
|
Hint = #20108#23618#20197#19978#21482#35201#36194#27425#25968#22823#20110#36755#27425#25968#23601#22238#31532#19968#23618
|
|
Caption = #39640#23618#36194#22810#22238#22522
|
|
Checked = True
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
State = cbChecked
|
|
TabOrder = 1
|
|
Visible = False
|
|
OnClick = OnChipOptionClick
|
|
end
|
|
object m_cbTierLos0: TCheckBox
|
|
Left = 325
|
|
Top = 5
|
|
Width = 70
|
|
Height = 17
|
|
Hint = #27599#23618#36755#30340#27425#25968#22810#20110#36194#26102#27880#30721#20026'0'
|
|
Caption = #36755#22810#25171'0'
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 7
|
|
Visible = False
|
|
OnClick = OnChipOptionClick
|
|
end
|
|
end
|
|
object m_btnInsRow: TButton
|
|
Left = 92
|
|
Top = 313
|
|
Width = 80
|
|
Height = 25
|
|
Caption = #25554#20837#34892
|
|
Enabled = False
|
|
TabOrder = 8
|
|
OnClick = OnInsRowClick
|
|
end
|
|
object m_pCombo: TComboBox
|
|
Left = 72
|
|
Top = 146
|
|
Width = 141
|
|
Height = 23
|
|
AutoDropDown = True
|
|
AutoCloseUp = True
|
|
Style = csDropDownList
|
|
DropDownCount = 20
|
|
DropDownWidth = 200
|
|
TabOrder = 0
|
|
TabStop = False
|
|
Visible = False
|
|
OnKeyDown = ComboKeyDown
|
|
end
|
|
end
|
|
object m_btnDel: TButton
|
|
Left = 352
|
|
Top = 40
|
|
Width = 75
|
|
Height = 23
|
|
Caption = #21024#38500
|
|
Enabled = False
|
|
TabOrder = 3
|
|
OnClick = OnDelClick
|
|
end
|
|
object m_btnTip: TButton
|
|
Left = 21
|
|
Top = 424
|
|
Width = 408
|
|
Height = 25
|
|
Caption = #28857#20987#26597#30475#35268#21017#35828#26126
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBtnText
|
|
Font.Height = -12
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
TabOrder = 4
|
|
OnClick = OnTipClick
|
|
end
|
|
object m_tsTop: TTabSet
|
|
Left = 0
|
|
Top = 0
|
|
Width = 448
|
|
Height = 25
|
|
ParentCustomHint = False
|
|
Align = alTop
|
|
AutoScroll = False
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -12
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
ParentShowHint = False
|
|
ShowHint = False
|
|
SoftTop = True
|
|
Style = tsOwnerDraw
|
|
Tabs.Strings = (
|
|
#25171#27861
|
|
#27880#30721)
|
|
TabPosition = tpTop
|
|
OnChange = TopChange
|
|
OnDrawTab = TopDrawTab
|
|
OnMeasureTab = TopMeasureTab
|
|
end
|
|
object m_pmSG: TPopupMenu
|
|
AutoHotkeys = maManual
|
|
Left = 301
|
|
Top = 307
|
|
object miExport: TMenuItem
|
|
Caption = #23548#20986#34920#26684'...'
|
|
OnClick = OnExport
|
|
end
|
|
object miImport: TMenuItem
|
|
Caption = #23548#20837#34920#26684'...'
|
|
OnClick = OnImport
|
|
end
|
|
end
|
|
end
|