📄 frmspy.frm
字号:
VERSION 5.00
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Begin VB.Form frmSpy
ClientHeight = 5685
ClientLeft = 165
ClientTop = 165
ClientWidth = 9540
Icon = "FRMSPY.frx":0000
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 379
ScaleMode = 3 'Pixel
ScaleWidth = 636
StartUpPosition = 2 'CenterScreen
Begin TabDlg.SSTab SSTab1
Height = 5655
Left = 0
TabIndex = 0
Top = 0
Width = 9525
_ExtentX = 16801
_ExtentY = 9975
_Version = 393216
Style = 1
TabHeight = 529
TabCaption(0) = "Active Tasks"
TabPicture(0) = "FRMSPY.frx":0442
Tab(0).ControlEnabled= -1 'True
Tab(0).Control(0)= "ImageList1"
Tab(0).Control(0).Enabled= 0 'False
Tab(0).Control(1)= "lvwTask"
Tab(0).Control(1).Enabled= 0 'False
Tab(0).Control(2)= "pIcon"
Tab(0).Control(2).Enabled= 0 'False
Tab(0).Control(3)= "cmdRact"
Tab(0).Control(3).Enabled= 0 'False
Tab(0).ControlCount= 4
TabCaption(1) = "Active Windows"
TabPicture(1) = "FRMSPY.frx":045E
Tab(1).ControlEnabled= 0 'False
Tab(1).Control(0)= "lvwParent"
Tab(1).Control(0).Enabled= 0 'False
Tab(1).Control(1)= "lvwChild"
Tab(1).Control(1).Enabled= 0 'False
Tab(1).Control(2)= "chkCap"
Tab(1).Control(2).Enabled= 0 'False
Tab(1).Control(3)= "cmdEnum"
Tab(1).Control(3).Enabled= 0 'False
Tab(1).Control(4)= "HScroll1"
Tab(1).Control(4).Enabled= 0 'False
Tab(1).ControlCount= 5
TabCaption(2) = "Startup Tasks"
TabPicture(2) = "FRMSPY.frx":047A
Tab(2).ControlEnabled= 0 'False
Tab(2).Control(0)= "imgStart"
Tab(2).Control(0).Enabled= 0 'False
Tab(2).Control(1)= "lvwRun"
Tab(2).Control(1).Enabled= 0 'False
Tab(2).Control(2)= "cmdRReg"
Tab(2).Control(2).Enabled= 0 'False
Tab(2).Control(3)= "cmdDelKey"
Tab(2).Control(3).Enabled= 0 'False
Tab(2).Control(4)= "cmdRegedit"
Tab(2).Control(4).Enabled= 0 'False
Tab(2).Control(5)= "pic2"
Tab(2).Control(5).Enabled= 0 'False
Tab(2).Control(6)= "cmdWin"
Tab(2).Control(6).Enabled= 0 'False
Tab(2).Control(7)= "cmdSys"
Tab(2).Control(7).Enabled= 0 'False
Tab(2).ControlCount= 8
Begin VB.CommandButton cmdSys
Caption = "System.ini"
Height = 255
Left = -70920
TabIndex = 15
Top = 5160
Width = 975
End
Begin VB.CommandButton cmdWin
Caption = "Win.ini"
Height = 255
Left = -72000
TabIndex = 14
Top = 5160
Width = 975
End
Begin VB.HScrollBar HScroll1
Height = 135
LargeChange = 30
Left = -74880
Max = 9150
Min = 1
SmallChange = 15
TabIndex = 13
Top = 4920
Value = 4575
Width = 9255
End
Begin VB.PictureBox pic2
Appearance = 0 'Flat
AutoRedraw = -1 'True
BackColor = &H80000005&
BorderStyle = 0 'None
ForeColor = &H80000008&
Height = 240
Left = -66960
ScaleHeight = 16
ScaleMode = 3 'Pixel
ScaleWidth = 16
TabIndex = 12
Top = 5160
Visible = 0 'False
Width = 240
End
Begin VB.CommandButton cmdEnum
Caption = "E&numerate"
Height = 375
Left = -66720
TabIndex = 11
Top = 5160
Width = 1095
End
Begin VB.CheckBox chkCap
Caption = "&Show only windows with captions."
Height = 195
Left = -74880
TabIndex = 8
Top = 5280
Width = 2775
End
Begin VB.CommandButton cmdRegedit
Caption = "Regedit"
Height = 375
Left = -66600
TabIndex = 7
Top = 5160
Width = 975
End
Begin VB.CommandButton cmdDelKey
Caption = "Remove Entry"
Height = 375
Left = -73800
TabIndex = 6
Top = 5160
Width = 1215
End
Begin VB.CommandButton cmdRReg
Caption = "Refresh"
Height = 375
Left = -74880
TabIndex = 5
Top = 5160
Width = 975
End
Begin VB.CommandButton cmdRact
Caption = "Refresh"
Height = 375
Left = 8160
TabIndex = 2
ToolTipText = "Refresh avtive task list."
Top = 5160
Width = 1215
End
Begin VB.PictureBox pIcon
Appearance = 0 'Flat
AutoRedraw = -1 'True
BackColor = &H80000005&
BorderStyle = 0 'None
ForeColor = &H80000008&
Height = 240
Left = 7800
ScaleHeight = 16
ScaleMode = 3 'Pixel
ScaleWidth = 16
TabIndex = 1
Top = 5160
Visible = 0 'False
Width = 240
End
Begin MSComctlLib.ListView lvwTask
Height = 4575
Left = 120
TabIndex = 3
Top = 480
Width = 9255
_ExtentX = 16325
_ExtentY = 8070
View = 3
LabelEdit = 1
LabelWrap = -1 'True
HideSelection = -1 'True
AllowReorder = -1 'True
FullRowSelect = -1 'True
GridLines = -1 'True
_Version = 393217
SmallIcons = "ImageList1"
ForeColor = -2147483640
BackColor = -2147483643
BorderStyle = 1
Appearance = 1
NumItems = 6
BeginProperty ColumnHeader(1) {BDD1F052-858B-11D1-B16A-00C0F0283628}
Text = "Display name"
Object.Width = 3175
EndProperty
BeginProperty ColumnHeader(2) {BDD1F052-858B-11D1-B16A-00C0F0283628}
SubItemIndex = 1
Text = "Full Path"
Object.Width = 8148
EndProperty
BeginProperty ColumnHeader(3) {BDD1F052-858B-11D1-B16A-00C0F0283628}
Alignment = 2
SubItemIndex = 2
Text = "Status"
Object.Width = 1764
EndProperty
BeginProperty ColumnHeader(4) {BDD1F052-858B-11D1-B16A-00C0F0283628}
Alignment = 2
SubItemIndex = 3
Text = "Priority"
Object.Width = 1764
EndProperty
BeginProperty ColumnHeader(5) {BDD1F052-858B-11D1-B16A-00C0F0283628}
Alignment = 2
SubItemIndex = 4
Text = "Usage"
Object.Width = 1235
EndProperty
BeginProperty ColumnHeader(6) {BDD1F052-858B-11D1-B16A-00C0F0283628}
Alignment = 2
SubItemIndex = 5
Text = "Threads"
Object.Width = 1411
EndProperty
End
Begin MSComctlLib.ImageList ImageList1
Left = 6840
Top = 5040
_ExtentX = 1005
_ExtentY = 1005
BackColor = -2147483643
ImageWidth = 16
ImageHeight = 16
MaskColor = 12632256
_Version = 393216
End
Begin MSComctlLib.ListView lvwRun
Height = 4575
Left = -74880
TabIndex = 4
Top = 480
Width = 9255
_ExtentX = 16325
_ExtentY = 8070
View = 3
LabelEdit = 1
LabelWrap = 0 'False
HideSelection = -1 'True
FullRowSelect = -1 'True
GridLines = -1 'True
_Version = 393217
ForeColor = -2147483640
BackColor = -2147483643
BorderStyle = 1
Appearance = 1
NumItems = 3
BeginProperty ColumnHeader(1) {BDD1F052-858B-11D1-B16A-00C0F0283628}
Text = "key"
Object.Width = 2822
EndProperty
BeginProperty ColumnHeader(2) {BDD1F052-858B-11D1-B16A-00C0F0283628}
SubItemIndex = 1
Text = "Name"
Object.Width = 3704
EndProperty
BeginProperty ColumnHeader(3) {BDD1F052-858B-11D1-B16A-00C0F0283628}
SubItemIndex = 2
Text = "Command"
Object.Width = 12347
EndProperty
End
Begin MSComctlLib.ListView lvwChild
Height = 4455
Left = -70200
TabIndex = 9
ToolTipText = "Child windows"
Top = 480
Width = 4575
_ExtentX = 8070
_ExtentY = 7858
LabelWrap = -1 'True
HideSelection = -1 'True
FullRowSelect = -1 'True
_Version = 393217
ForeColor = 12582912
BackColor = 16777215
BorderStyle = 1
Appearance = 1
NumItems = 0
End
Begin MSComctlLib.ListView lvwParent
Height = 4455
Left = -74880
TabIndex = 10
ToolTipText = "Parent windows"
Top = 480
Width = 4575
_ExtentX = 8070
_ExtentY = 7858
LabelWrap = -1 'True
HideSelection = -1 'True
FullRowSelect = -1 'True
_Version = 393217
ForeColor = 12582912
BackColor = 16777215
BorderStyle = 1
Appearance = 1
NumItems = 0
End
Begin MSComctlLib.ImageList imgStart
Left = -67680
Top = 5040
_ExtentX = 1005
_ExtentY = 1005
BackColor = -2147483643
ImageWidth = 16
ImageHeight = 16
MaskColor = 12632256
_Version = 393216
End
End
Begin VB.Menu mnuActTsk
Caption = "ActTsk"
Visible = 0 'False
Begin VB.Menu mnuProp
Caption = "File Properties"
End
Begin VB.Menu mnuMod
Caption = "Used Modules"
End
Begin VB.Menu mnuStr
Caption = "View"
End
Begin VB.Menu s1
Caption = "-"
End
Begin VB.Menu mnuEndTsk
Caption = "End Task"
End
End
Begin VB.Menu Options
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -