📄 main.frm
字号:
TabIndex = 87
Top = 1080
Width = 1620
End
Begin VB.TextBox TextWar1
Alignment = 1 'Right Justify
Height = 285
Index = 0
Left = -74340
MaxLength = 2
TabIndex = 84
Text = "30"
Top = 3894
Width = 510
End
Begin VB.CheckBox CheWar
Caption = "ID选怪时只攻击下列怪"
Height = 255
Index = 3
Left = -74910
MousePointer = 2 'Cross
TabIndex = 83
Top = 420
Width = 2265
End
Begin VB.CommandButton ComWar
Caption = "删"
Height = 285
Index = 1
Left = -72555
TabIndex = 82
Top = 2133
Width = 350
End
Begin VB.CommandButton ComWar
Caption = "增"
Height = 285
Index = 0
Left = -74910
TabIndex = 81
Top = 2133
Width = 350
End
Begin VB.TextBox TextWar1
Height = 285
Index = 1
Left = -74460
TabIndex = 80
Top = 2133
Width = 1800
End
Begin VB.ListBox ListWar1
Height = 1320
ItemData = "Main.frx":0FFD
Left = -74910
List = "Main.frx":0FFF
TabIndex = 79
Top = 735
Width = 2700
End
Begin MSComctlLib.ListView LVNpc
Height = 2085
Index = 0
Left = -74925
TabIndex = 98
Top = 4260
Width = 2730
_ExtentX = 4815
_ExtentY = 3678
View = 3
LabelEdit = 1
Sorted = -1 'True
LabelWrap = -1 'True
HideSelection = -1 'True
FullRowSelect = -1 'True
_Version = 393217
ForeColor = -2147483640
BackColor = -2147483643
BorderStyle = 1
Appearance = 1
NumItems = 0
End
Begin VB.ListBox ListBuff
Height = 960
ItemData = "Main.frx":1001
Left = -74910
List = "Main.frx":1003
TabIndex = 116
Top = 3225
Width = 2295
End
Begin VB.Label Label7
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "名称"
Height = 180
Index = 14
Left = 90
TabIndex = 266
Top = 1515
Width = 360
End
Begin VB.Label TaskStat
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "状态"
Height = 180
Index = 1
Left = 315
TabIndex = 257
Top = 6090
Width = 360
End
Begin VB.Label TaskStat
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "状态"
Height = 180
Index = 0
Left = 135
TabIndex = 256
Top = 5790
Width = 360
End
Begin VB.Label Label7
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "攻击半径"
Height = 195
Index = 4
Left = 90
TabIndex = 109
Top = 780
Width = 720
End
Begin VB.Label Label7
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "Y"
Height = 195
Index = 5
Left = 1575
TabIndex = 108
Top = 780
Width = 105
End
Begin VB.Label Label7
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "X"
Height = 195
Index = 7
Left = 1575
TabIndex = 107
Top = 435
Width = 105
End
Begin VB.Label Label7
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "米范围内的怪物"
Height = 195
Index = 8
Left = -73620
TabIndex = 86
Top = 3945
Width = 1260
End
Begin VB.Label Label7
AutoSize = -1 'True
Caption = "周围"
Height = 195
Index = 9
Left = -74880
TabIndex = 85
Top = 3945
Width = 360
End
End
Begin VB.Frame FrameWar1
Caption = "攻击"
Height = 960
Left = -74910
TabIndex = 74
Top = 420
Width = 2895
Begin VB.CheckBox CheWar
Caption = "协助队员"
Height = 255
Index = 6
Left = 105
MousePointer = 2 'Cross
TabIndex = 120
Top = 585
Width = 1065
End
Begin VB.CheckBox CheWar
Caption = "速打"
Height = 255
Index = 2
Left = 1200
MousePointer = 2 'Cross
TabIndex = 97
Top = 585
Width = 705
End
Begin VB.CheckBox CheWar
Caption = "不抢怪"
Height = 255
Index = 1
Left = 915
MousePointer = 2 'Cross
TabIndex = 96
Top = 240
Width = 870
End
Begin VB.OptionButton OptWar1
Caption = "Tab"
Height = 255
Index = 0
Left = 1905
TabIndex = 77
Top = 240
Width = 870
End
Begin VB.OptionButton OptWar1
Caption = "ID选怪"
Height = 255
Index = 1
Left = 1905
TabIndex = 76
Top = 585
Width = 870
End
Begin VB.CheckBox CheWar
Caption = "攻击"
Height = 255
Index = 0
Left = 105
MousePointer = 2 'Cross
TabIndex = 75
Top = 240
Width = 750
End
End
Begin TabDlg.SSTab SSTab3
Height = 3270
Left = -74910
TabIndex = 57
Top = 1500
Width = 2895
_ExtentX = 5106
_ExtentY = 5768
_Version = 393216
Style = 1
TabHeight = 520
TabCaption(0) = "物品过滤"
TabPicture(0) = "Main.frx":1005
Tab(0).ControlEnabled= -1 'True
Tab(0).Control(0)= "ChePick1(1)"
Tab(0).Control(0).Enabled= 0 'False
Tab(0).Control(1)= "ListPick1"
Tab(0).Control(1).Enabled= 0 'False
Tab(0).Control(2)= "TextPick1(1)"
Tab(0).Control(2).Enabled= 0 'False
Tab(0).Control(3)= "ComPick(0)"
Tab(0).Control(3).Enabled= 0 'False
Tab(0).Control(4)= "ComPick(1)"
Tab(0).Control(4).Enabled= 0 'False
Tab(0).ControlCount= 5
TabCaption(1) = "出售物品"
TabPicture(1) = "Main.frx":1021
Tab(1).ControlEnabled= 0 'False
Tab(1).Control(0)= "ChePick1(2)"
Tab(1).Control(1)= "ListPick2"
Tab(1).Control(2)= "TextPick1(2)"
Tab(1).Control(3)= "ComPick(2)"
Tab(1).Control(4)= "ComPick(3)"
Tab(1).ControlCount= 5
TabCaption(2) = "保存物品"
TabPicture(2) = "Main.frx":103D
Tab(2).ControlEnabled= 0 'False
Tab(2).Control(0)= "ComPick(5)"
Tab(2).Control(1)= "ComPick(4)"
Tab(2).Control(2)= "TextPick1(3)"
Tab(2).Control(3)= "ListPick3"
Tab(2).Control(4)= "ChePick1(3)"
Tab(2).ControlCount= 5
Begin VB.CheckBox ChePick1
Caption = "保存下列物品(不选则不存)"
Height = 285
Index = 3
Left = -74910
TabIndex = 73
Top = 405
Width = 2640
End
Begin VB.ListBox ListPick3
Height = 2040
ItemData = "Main.frx":1059
Left = -74910
List = "Main.frx":105B
TabIndex = 72
Top = 735
Width = 2700
End
Begin VB.TextBox TextPick1
Height = 285
Index = 3
Left = -74460
TabIndex = 71
Top = 2850
Width = 1800
End
Begin VB.CommandButton ComPick
Caption = "增"
Height = 285
Index = 4
Left = -74910
TabIndex = 70
Top = 2850
Width = 350
End
Begin VB.CommandButton ComPick
Caption = "删"
Height = 285
Index = 5
Left = -72555
TabIndex = 69
Top = 2850
Width = 350
End
Begin VB.CommandButton ComPick
Caption = "删"
Height = 285
Index = 3
Left = -72555
TabIndex = 67
Top = 2850
Width = 350
End
Begin VB.CommandButton ComPick
Caption = "增"
Height = 285
Index = 2
Left = -74910
TabIndex = 66
Top = 2850
Width = 350
End
Begin VB.TextBox TextPick1
Height = 285
Index = 2
Left = -74460
TabIndex = 65
Top = 2850
Width = 1800
End
Begin VB.ListBox ListPick2
Height = 2040
ItemData = "Main.frx":105D
L
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -