2023-02-02 12:02:14 +03:00

244 lines
5.8 KiB
Plaintext

object Form1: TForm1
Left = 381
Top = 183
Width = 578
Height = 654
Caption = 'Тест производительности FWZip'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
Position = poScreenCenter
PixelsPerInch = 96
object GroupBox1: TGroupBox
Left = 8
Top = 8
Width = 527
Height = 105
Anchors = [akLeft, akTop, akRight]
Caption = 'Настройки сжатия'
TabOrder = 0
object LabeledEdit1: TLabeledEdit
Left = 14
Top = 26
Width = 469
Height = 21
Anchors = [akLeft, akTop, akRight]
EditLabel.Width = 149
EditLabel.Height = 13
EditLabel.Caption = 'Выберите папку для сжатия:'
TabOrder = 0
Text = 'D:\StroyInfo 5'
OnChange = LabeledEdit1Change
end
object Button1: TButton
Left = 489
Top = 24
Width = 26
Height = 25
Hint = 'Обзор...'
Anchors = [akTop, akRight]
Caption = '...'
ParentShowHint = False
ShowHint = True
TabOrder = 1
OnClick = Button1Click
end
object CheckBox1: TCheckBox
Left = 14
Top = 58
Width = 145
Height = 17
Caption = 'Шифровать при сжатии'
TabOrder = 2
OnClick = CheckBox1Click
end
object LabeledEdit2: TLabeledEdit
Left = 262
Top = 56
Width = 172
Height = 21
Anchors = [akLeft, akTop, akRight]
EditLabel.Width = 84
EditLabel.Height = 13
EditLabel.Caption = 'Укажите пароль'
Enabled = False
LabelPosition = lpLeft
TabOrder = 3
end
object Button2: TButton
Left = 440
Top = 55
Width = 75
Height = 25
Anchors = [akTop, akRight]
Caption = 'Сжать'
TabOrder = 4
OnClick = Button2Click
end
end
object GroupBox2: TGroupBox
Left = 8
Top = 128
Width = 527
Height = 137
Anchors = [akLeft, akTop, akRight]
Caption = 'Настройки распаковки'
TabOrder = 1
object LabeledEdit3: TLabeledEdit
Left = 14
Top = 26
Width = 469
Height = 21
Anchors = [akLeft, akTop, akRight]
EditLabel.Width = 171
EditLabel.Height = 13
EditLabel.Caption = 'Выберите архив для распаковки:'
TabOrder = 0
OnChange = LabeledEdit3Change
end
object Button3: TButton
Left = 489
Top = 24
Width = 26
Height = 25
Hint = 'Обзор...'
Anchors = [akTop, akRight]
Caption = '...'
ParentShowHint = False
ShowHint = True
TabOrder = 1
OnClick = Button3Click
end
object CheckBox2: TCheckBox
Left = 14
Top = 58
Width = 145
Height = 17
Caption = 'Архив зашифрован'
TabOrder = 2
OnClick = CheckBox2Click
end
object LabeledEdit4: TLabeledEdit
Left = 262
Top = 56
Width = 167
Height = 21
Anchors = [akLeft, akTop, akRight]
EditLabel.Width = 84
EditLabel.Height = 13
EditLabel.Caption = 'Укажите пароль'
Enabled = False
LabelPosition = lpLeft
TabOrder = 3
end
object Button4: TButton
Left = 440
Top = 54
Width = 75
Height = 25
Anchors = [akTop, akRight]
Caption = 'Распаковать'
TabOrder = 4
OnClick = Button4Click
end
object Button6: TButton
Tag = 1
Left = 440
Top = 85
Width = 75
Height = 25
Anchors = [akTop, akRight]
Caption = 'Проверить'
TabOrder = 5
OnClick = Button4Click
end
end
object GroupBox3: TGroupBox
Left = 8
Top = 271
Width = 527
Height = 178
Anchors = [akLeft, akTop, akRight]
Caption = 'Производительность:'
TabOrder = 2
object Label1: TLabel
Left = 14
Top = 10
Width = 163
Height = 13
Caption = 'Текущий расход памяти: 0 байт'
end
object Label2: TLabel
Left = 14
Top = 29
Width = 163
Height = 13
Caption = 'Пиковый расход памяти: 0 байт'
end
object Label3: TLabel
Left = 14
Top = 48
Width = 166
Height = 13
Caption = 'Общее количество элементов: 0'
end
object Label4: TLabel
Left = 14
Top = 67
Width = 142
Height = 13
Caption = 'Общее размер элементов: 0'
end
object Label5: TLabel
Left = 14
Top = 95
Width = 501
Height = 13
Anchors = [akLeft, akTop, akRight]
AutoSize = False
end
object ProgressBar1: TProgressBar
Left = 14
Top = 114
Width = 498
Height = 17
Anchors = [akLeft, akTop, akRight]
TabOrder = 0
end
object ProgressBar2: TProgressBar
Left = 14
Top = 137
Width = 498
Height = 17
Anchors = [akLeft, akTop, akRight]
TabOrder = 1
end
object Button5: TButton
Left = 437
Top = 83
Width = 75
Height = 25
Anchors = [akTop, akRight]
Caption = 'Остановить'
TabOrder = 2
Visible = False
OnClick = Button5Click
end
end
object Memo1: TMemo
Left = 8
Top = 456
Width = 527
Height = 146
Anchors = [akLeft, akTop, akRight, akBottom]
ScrollBars = ssVertical
TabOrder = 3
end
object OpenDialog1: TOpenDialog
Left = 376
Top = 224
end
end