📄 main.dfm
字号:
object frm_Main: Tfrm_Main
Left = 323
Top = 213
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = 'EXE'#25991#20214#21152#23494#22120
ClientHeight = 299
ClientWidth = 415
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 12
object StatusBar1: TStatusBar
Left = 0
Top = 280
Width = 415
Height = 19
Panels = <
item
Bevel = pbNone
Style = psOwnerDraw
Width = 20
end
item
Width = 50
end>
ParentShowHint = False
ShowHint = True
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 415
Height = 280
Align = alClient
BevelInner = bvLowered
BevelOuter = bvNone
TabOrder = 1
object PageControl1: TPageControl
Left = 1
Top = 49
Width = 413
Height = 230
ActivePage = TabSheet1
Align = alClient
MultiLine = True
TabOrder = 0
TabWidth = 97
object TabSheet1: TTabSheet
Caption = #25991#20214#21152#23494#35299#23494
object Button_OpenFile: TSpeedButton
Left = 343
Top = 32
Width = 21
Height = 21
Hint = #25171#24320#25991#20214
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
DDDDDDDDDDDDDDDDDDDDDD0000000000DDDDDD00333333330DDDDD0B03333333
30DDDD0BB0333333330DDD0BBB000000000DDD0BBBBBBBB0DDDDDD0BBB000000
DDDDDDD000DDDDDDDDDDDDDDDDDDDDD000DDDDDDDDDDDDDD00DDDDDDDDD0DDD0
D0DDDDDDDDDD000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD}
ParentShowHint = False
ShowHint = True
OnClick = Button_OpenFileClick
end
object Button_Directory: TSpeedButton
Left = 364
Top = 32
Width = 21
Height = 21
Hint = #20999#25442#21040#30446#24405
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
DDDDD0000000000000DDD8777777777770DDDF888888888870DDDF8888888888
70DDDF899888888870DDDFFFFFFFFFFF88DDDDDDDDD0000000DDDD0DDD0FBFBF
BF0DD0DDDD0BFBFBFB0DD0DD0D0FBFBFBF0DDD00000BFBFBFB0DDDDD0D0000BF
BF0DDDDDDD0BFB0000DDDDDDDDD000DDDDDDDDDDDDDDDDDDDDDD}
ParentShowHint = False
ShowHint = True
OnClick = Button_DirectoryClick
end
object Button_Preview: TSpeedButton
Left = 364
Top = 80
Width = 21
Height = 21
Hint = #39044#35272#25928#26524
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
DDDDDDDDDDDDDDDD02ADDDDDDDDDDDD02AF0DDDDDDDDDD000F0DDDD000000D00
80DDDD08FFFF80000DDDD07FFFFFF70DDDDD07FFF77FF870DDDD08FF7FF7FF80
DDDD0FFF7FF7FFF0DDDD0FFF7FF7FFF0DDDD08FF7FF7FF80DDDD07FFFFFFF870
DDDDD07FFFFFF80DDDDDDD08FFFF80DDDDDDDDD000000DDDDDDD}
ParentShowHint = False
ShowHint = True
OnClick = Button_PreviewClick
end
object Button_Go: TBitBtn
Left = 16
Top = 160
Width = 177
Height = 25
Caption = #24320#22987#21152#23494#25991#20214'[&O]'
TabOrder = 6
OnClick = Button_GoClick
end
object Button_UnGo: TBitBtn
Left = 208
Top = 160
Width = 177
Height = 25
Caption = #24320#22987#35299#23494#25991#20214'[&E]'
TabOrder = 7
OnClick = Button_UnGoClick
end
object Edit_Pass1: TEdit
Left = 208
Top = 128
Width = 177
Height = 20
PasswordChar = '#'
TabOrder = 5
end
object Edit_Pass: TEdit
Left = 16
Top = 128
Width = 177
Height = 20
Hint = '<18'#23383#33410
ParentShowHint = False
PasswordChar = '#'
ShowHint = True
TabOrder = 4
end
object StaticText1: TStaticText
Left = 16
Top = 112
Width = 64
Height = 16
Caption = #36755#20837#23494#30721#65306
TabOrder = 0
end
object StaticText_Pass1: TStaticText
Left = 208
Top = 112
Width = 64
Height = 16
Caption = #37325#22797#23494#30721#65306
TabOrder = 2
end
object StaticText2: TStaticText
Left = 16
Top = 16
Width = 130
Height = 16
Caption = #36873#25321#35201#25805#20316#30340'EXE'#25991#20214#65306
TabOrder = 1
end
object Edit_FileName: TEdit
Left = 16
Top = 32
Width = 327
Height = 20
TabOrder = 3
OnChange = Edit_FileNameChange
end
object Edit_Caption: TEdit
Left = 17
Top = 80
Width = 347
Height = 20
Hint = '<26'#20010#27721#23383
MaxLength = 52
ParentShowHint = False
ShowHint = True
TabOrder = 8
end
object StaticText_Caption: TStaticText
Left = 16
Top = 64
Width = 124
Height = 16
Caption = #21152#23494#21518#25991#20214#25552#31034#20449#24687#65306
TabOrder = 9
end
object CheckBox_BackUp: TCheckBox
Left = 208
Top = 14
Width = 129
Height = 17
Caption = #22791#20221#21407#25991#20214#20026' *.BAK'
Checked = True
State = cbChecked
TabOrder = 10
end
end
object TabSheet3: TTabSheet
Caption = #35774#32622#19982#20851#20110
ImageIndex = 2
object lb_email: TLabel
Left = 16
Top = 136
Width = 36
Height = 12
Caption = #30005#37038#65306
Transparent = True
end
object lb_HomePage: TLabel
Left = 208
Top = 136
Width = 36
Height = 12
Caption = #20027#39029#65306
Transparent = True
end
object homepage: TLabel
Left = 248
Top = 132
Width = 119
Height = 16
Cursor = crHandPoint
Hint = #21435#25105#30340#20027#39029'DELPHI'#30418#23376
Caption = 'http://www.2ccc.com'
Font.Charset = ANSI_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsUnderline]
ParentFont = False
ParentShowHint = False
ShowHint = True
Transparent = True
OnClick = homepageClick
end
object email: TLabel
Left = 56
Top = 132
Width = 129
Height = 16
Cursor = crHandPoint
Hint = #32473#25105#20889#20449
Caption = 'mantousoft@163.com'
Font.Charset = ANSI_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsUnderline]
ParentFont = False
ParentShowHint = False
ShowHint = True
Transparent = True
OnClick = emailClick
end
object update: TLabel
Left = 56
Top = 148
Width = 189
Height = 16
Cursor = crHandPoint
Hint = #23519#30475#26159#21542#24050#26377#21319#32423#29256#26412
Caption = 'http://www.2ccc.com/downloads'
Font.Charset = ANSI_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsUnderline]
ParentFont = False
ParentShowHint = False
ShowHint = True
Transparent = True
OnClick = updateClick
end
object lb_UpData: TLabel
Left = 16
Top = 152
Width = 36
Height = 12
Caption = #21319#32423#65306
Transparent = True
end
object lb_Author: TLabel
Left = 248
Top = 176
Width = 144
Height = 12
Caption = #20316#32773#65306#19975#37325' 2001'#24180'6'#26376'1'#26085
end
object GroupBox1: TGroupBox
Left = 8
Top = 16
Width = 385
Height = 105
Caption = #35774#32622
TabOrder = 0
object cb_Assoc: TCheckBox
Left = 16
Top = 40
Width = 169
Height = 17
Caption = #19982'EXE'#25991#20214#24314#31435#21152#23494#20851#32852#33756#21333
TabOrder = 0
OnClick = cb_OptionClick
end
object btn_Apply: TButton
Left = 16
Top = 64
Width = 169
Height = 25
Caption = #24212#29992'[&P]'
TabOrder = 1
OnClick = btn_ApplyClick
end
object cb_NeedPass: TCheckBox
Left = 200
Top = 40
Width = 169
Height = 17
Caption = #36816#34892#25991#20214#21152#23494#31243#24207#38656#35201#23494#30721
TabOrder = 2
OnClick = cb_OptionClick
end
object Button1: TButton
Left = 200
Top = 64
Width = 169
Height = 25
Caption = #26356#25913#23494#30721'[&C]'
TabOrder = 3
OnClick = Button1Click
end
object rb_Speed: TRadioButton
Left = 200
Top = 16
Width = 169
Height = 17
Caption = #36895#24230#20248#20808#65288#19981#21387#32553#65289
TabOrder = 4
OnClick = cb_OptionClick
end
object rb_Comp: TRadioButton
Left = 16
Top = 16
Width = 169
Height = 17
Caption = #23433#20840#20248#20808#65288#21387#32553#65289
Checked = True
TabOrder = 5
TabStop = True
OnClick = cb_OptionClick
end
end
end
end
object Panel2: TPanel
Left = 1
Top = 1
Width = 413
Height = 48
Align = alTop
TabOrder = 1
object lb_Ver: TLabel
Left = 232
Top = 30
Width = 153
Height = 12
Alignment = taCenter
AutoSize = False
Caption = 'lb_Ver'
end
object Bevel1: TBevel
Left = 232
Top = 24
Width = 153
Height = 3
Shape = bsTopLine
end
object StaticText5: TStaticText
Left = 232
Top = 7
Width = 154
Height = 16
Caption = 'WIN32 EXE LOCKER FREEWARE'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
end
object StaticText3: TStaticText
Left = 16
Top = 8
Width = 180
Height = 33
Caption = 'EXE FILE LOCK'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -24
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
end
end
end
object OpenDialog1: TOpenDialog
Filter = #21487#25191#34892#25991#20214'(*.exe)|*.exe'
Left = 368
Top = 48
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -