📄 foxtools.frm
字号:
VERSION 5.00
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Object = "{3B7C8863-D78F-101B-B9B5-04021C009402}#1.2#0"; "RICHTX32.OCX"
Begin VB.Form form1
BorderStyle = 1 'Fixed Single
Caption = "FoxTools 3.0 By RMH"
ClientHeight = 4710
ClientLeft = 45
ClientTop = 330
ClientWidth = 9900
FillColor = &H00C0C0C0&
ForeColor = &H80000016&
Icon = "foxtools.frx":0000
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
NegotiateMenus = 0 'False
ScaleHeight = 4710
ScaleWidth = 9900
StartUpPosition = 2 'CenterScreen
Begin VB.CheckBox Check6
Caption = "关键字小写"
Height = 300
Left = 6000
TabIndex = 60
Top = 3990
Width = 1215
End
Begin VB.Frame Frame4
Caption = "解密与脱壳"
Height = 3870
Left = 8670
TabIndex = 48
Top = 4215
Visible = 0 'False
Width = 9480
Begin VB.TextBox Text1
Height = 345
Left = 285
Locked = -1 'True
TabIndex = 51
Top = 690
Width = 7470
End
Begin VB.CommandButton Command12
Caption = "解FoxtoolII型加密"
Height = 420
Left = 450
TabIndex = 50
Top = 1470
Width = 2865
End
Begin VB.CommandButton Command11
Caption = "选择文件"
Height = 390
Left = 7800
TabIndex = 49
Top = 690
Width = 1125
End
Begin VB.Label Label12
Caption = $"foxtools.frx":0442
Height = 720
Left = 375
TabIndex = 59
Top = 2295
Width = 6975
End
End
Begin VB.Frame Frame3
Caption = "快速查看"
Height = 3930
Left = 240
TabIndex = 43
Top = 5280
Visible = 0 'False
Width = 9495
Begin RichTextLib.RichTextBox RichTextBox1
Height = 3525
Left = 2610
TabIndex = 47
Top = 240
Width = 6780
_ExtentX = 11959
_ExtentY = 6218
_Version = 393217
ScrollBars = 3
Appearance = 0
TextRTF = $"foxtools.frx":050D
End
Begin VB.FileListBox File1
Appearance = 0 'Flat
Height = 1785
Left = 75
Pattern = $"foxtools.frx":05A5
TabIndex = 46
ToolTipText = "单击查看.双击反编译/修复"
Top = 1755
Width = 2445
End
Begin VB.DirListBox Dir1
Appearance = 0 'Flat
Height = 1140
Left = 75
TabIndex = 45
Top = 600
Width = 2445
End
Begin VB.DriveListBox Drive1
Appearance = 0 'Flat
Height = 300
Left = 60
TabIndex = 44
Top = 225
Width = 2490
End
Begin VB.Label Label14
BackStyle = 0 'Transparent
Caption = "单击查看,双击反编译&&修复"
Height = 255
Left = 75
TabIndex = 52
Top = 3675
Width = 2310
End
End
Begin MSComctlLib.ListView ListView1
Height = 3495
Left = 6240
TabIndex = 42
Top = 4320
Visible = 0 'False
Width = 6615
_ExtentX = 11668
_ExtentY = 6165
LabelWrap = -1 'True
HideSelection = -1 'True
GridLines = -1 'True
_Version = 393217
ForeColor = -2147483640
BackColor = -2147483628
BorderStyle = 1
Appearance = 1
NumItems = 0
End
Begin MSComctlLib.ImageList IML
Left = 8730
Top = 0
_ExtentX = 1005
_ExtentY = 1005
BackColor = -2147483643
MaskColor = 14805982
_Version = 393216
End
Begin VB.CheckBox ChkBuild
Caption = "创建生成项目文件的build.prg"
Enabled = 0 'False
Height = 300
Left = 3120
TabIndex = 35
Top = 3990
Value = 1 'Checked
Width = 2895
End
Begin VB.CheckBox ChkAddDebug
Caption = "添加调试代码&&修复表单/类库"
Enabled = 0 'False
Height = 300
Left = 240
TabIndex = 34
ToolTipText = "如果选定的 APP/EXE 中包含有表单或类库,复选该选项将在反编译时反编译表单和类库中的代码并修复表单和类库"
Top = 3990
Value = 1 'Checked
Width = 2775
End
Begin VB.Frame Frame7
BorderStyle = 0 'None
Caption = "提示："
Height = 495
Left = 7320
TabIndex = 32
Top = 3570
Width = 2295
Begin VB.Label Label11
Appearance = 0 'Flat
BackColor = &H80000005&
BackStyle = 0 'Transparent
Caption = "提示：可以双击列表中的一个项来查看文件内容"
ForeColor = &H80000008&
Height = 420
Left = 60
TabIndex = 33
Top = 75
Width = 2220
End
End
Begin VB.Frame Frame6
Caption = "系统设置"
Height = 3495
Left = 1080
TabIndex = 24
Top = 1920
Visible = 0 'False
Width = 8640
Begin VB.CheckBox Check5
Caption = "反代码转换"
Height = 285
Left = 195
TabIndex = 58
Top = 810
Width = 4035
End
Begin VB.CommandButton Command3
Caption = "生成注册文件"
Height = 345
Left = 5940
TabIndex = 55
Top = 2850
Visible = 0 'False
Width = 1485
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
BackColor = &H8000000B&
BorderStyle = 0 'None
ForeColor = &H000000FF&
Height = 285
Left = 5940
Locked = -1 'True
TabIndex = 54
Top = 2460
Visible = 0 'False
Width = 1425
End
Begin VB.CheckBox ChkReoveHeaderFile
Caption = "修复表单/类库时,去掉表单/类库对头文件 (.H 文件) 的引用"
Height = 375
Left = 195
TabIndex = 30
Top = 1110
Value = 1 'Checked
Width = 5190
End
Begin VB.OptionButton Option3
Caption = "6.0/7.0/8.0/9.0"
Height = 180
Left = 195
TabIndex = 28
Top = 2640
Value = -1 'True
Width = 1695
End
Begin VB.OptionButton Option2
Caption = "5.0"
Height = 180
Left = 195
TabIndex = 27
Top = 2280
Width = 2055
End
Begin VB.OptionButton Option1
Caption = "3.0"
Height = 375
Left = 195
TabIndex = 26
Top = 1800
Width = 2775
End
Begin VB.CheckBox Check1
Caption = "分析生成 app 文件"
Height = 375
Left = 195
TabIndex = 25
Top = 405
Width = 4575
End
Begin VB.Label Label1
Caption = "本机注册号为:"
Height = 270
Left = 5940
TabIndex = 53
Top = 2055
Visible = 0 'False
Width = 1215
End
Begin VB.Label Label3
Caption = "文件版本(选择VF的文件版本)"
Height = 375
Left = 195
TabIndex = 29
Top = 1605
Width = 4605
End
End
Begin MSComctlLib.ProgressBar ProgressBar1
Height = 225
Left = 5160
TabIndex = 19
Top = 4425
Width = 4575
_ExtentX = 8070
_ExtentY = 397
_Version = 393216
Appearance = 0
End
Begin MSComctlLib.StatusBar StatusBar1
Align = 2 'Align Bottom
Height = 375
Left = 0
TabIndex = 18
Top = 4335
Width = 9900
_ExtentX = 17463
_ExtentY = 661
_Version = 393216
BeginProperty Panels {8E3867A5-8586-11D1-B16A-00C0F0283628}
NumPanels = 2
BeginProperty Panel1 {8E3867AB-8586-11D1-B16A-00C0F0283628}
Object.Width = 8926
MinWidth = 8926
EndProperty
BeginProperty Panel2 {8E3867AB-8586-11D1-B16A-00C0F0283628}
Object.Width = 8467
MinWidth = 8467
EndProperty
EndProperty
End
Begin VB.Frame Frame5
Caption = "文件信息"
Height = 2535
Left = 7350
TabIndex = 8
Top = 1005
Width = 2295
Begin VB.TextBox txtffo
BackColor = &H80000014&
Enabled = 0 'False
Height = 340
Left = 960
TabIndex = 23
Top = 2040
Width = 1215
End
Begin VB.TextBox txtftb
BackColor = &H80000014&
Enabled = 0 'False
Height = 340
Left = 960
TabIndex = 22
Top = 1680
Width = 1215
End
Begin VB.TextBox txtEncrypt
BackColor = &H80000014&
Enabled = 0 'False
Height = 340
Left = 960
Locked = -1 'True
TabIndex = 17
Top = 1320
Width = 1215
End
Begin VB.TextBox txtMainFile
BackColor = &H80000014&
Enabled = 0 'False
Height = 340
Left = 960
Locked = -1 'True
TabIndex = 16
Top = 960
Width = 1215
End
Begin VB.TextBox txtFileNum
BackColor = &H80000014&
Enabled = 0 'False
Height = 340
Left = 960
Locked = -1 'True
TabIndex = 15
Top = 600
Width = 1215
End
Begin VB.TextBox txtVersion
BackColor = &H80000014&
Enabled = 0 'False
Height = 340
Left = 960
Locked = -1 'True
TabIndex = 14
Top = 240
Width = 1215
End
Begin VB.Label Label10
Alignment = 1 'Right Justify
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "首文件偏移"
Height = 180
Left = 45
TabIndex = 21
Top = 2160
Width = 900
End
Begin VB.Label Label9
Alignment = 1 'Right Justify
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "文件表偏移"
Height = 180
Left = 45
TabIndex = 20
Top = 1800
Width = 900
End
Begin VB.Label Label8
Alignment = 1 'Right Justify
AutoSize = -1 'True
Caption = "加密否"
Height = 180
Left = 405
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -