📄 uzipdemo.~dfm
字号:
object Form1: TForm1
Left = 320
Top = 273
Width = 622
Height = 465
Caption = 'ZIP file Demo'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnCreate = FormCreate
OnDestroy = FormDestroy
PixelsPerInch = 96
TextHeight = 13
object PageControl1: TPageControl
Left = 5
Top = 8
Width = 594
Height = 403
ActivePage = TabSheet2
TabOrder = 0
object TabSheet1: TTabSheet
Caption = 'Compression'
object GroupBox1: TGroupBox
Left = 5
Top = 7
Width = 581
Height = 317
Caption = 'Add files'
TabOrder = 0
object Memo1: TMemo
Left = 10
Top = 27
Width = 565
Height = 276
ReadOnly = True
ScrollBars = ssVertical
TabOrder = 0
end
end
object Button1: TButton
Left = 504
Top = 338
Width = 75
Height = 25
Caption = 'Make a Zip'
TabOrder = 1
OnClick = Button1Click
end
object Button3: TButton
Left = 234
Top = 338
Width = 91
Height = 25
Caption = 'Clear File List'
TabOrder = 2
OnClick = Button3Click
end
object LabeledEdit1: TLabeledEdit
Left = 45
Top = 340
Width = 62
Height = 21
Color = clScrollBar
EditLabel.Width = 16
EditLabel.Height = 13
EditLabel.Caption = 'File'
LabelPosition = lpLeft
ReadOnly = True
TabOrder = 3
end
object LabeledEdit2: TLabeledEdit
Left = 155
Top = 340
Width = 62
Height = 21
Color = clScrollBar
EditLabel.Width = 29
EditLabel.Height = 13
EditLabel.Caption = 'Folder'
LabelPosition = lpLeft
ReadOnly = True
TabOrder = 4
end
object Edit1: TEdit
Left = 368
Top = 340
Width = 121
Height = 21
TabOrder = 5
Text = 'Edit1'
end
end
object TabSheet2: TTabSheet
Caption = 'Decompression'
ImageIndex = 1
object Button2: TButton
Left = 485
Top = 342
Width = 83
Height = 25
Caption = 'Release a Zip'
TabOrder = 0
OnClick = Button2Click
end
object GroupBox2: TGroupBox
Left = 4
Top = 36
Width = 581
Height = 291
Caption = 'files'
TabOrder = 1
object Memo2: TMemo
Left = 6
Top = 19
Width = 559
Height = 264
ReadOnly = True
ScrollBars = ssVertical
TabOrder = 0
end
end
object Button4: TButton
Left = 496
Top = 11
Width = 75
Height = 25
Caption = '...'
TabOrder = 2
OnClick = Button4Click
end
object LabeledEditZipFile: TLabeledEdit
Left = 71
Top = 14
Width = 407
Height = 21
Color = clScrollBar
EditLabel.Width = 55
EditLabel.Height = 13
EditLabel.Caption = 'Select a file'
LabelPosition = lpLeft
ReadOnly = True
TabOrder = 3
end
object Edit2: TEdit
Left = 346
Top = 344
Width = 121
Height = 21
TabOrder = 4
Text = 'Edit1'
end
end
end
object SaveDialog1: TSaveDialog
Left = 47
Top = 116
end
object OpenDialog1: TOpenDialog
Left = 48
Top = 85
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -