20230202
This commit is contained in:
		
							
								
								
									
										244
									
								
								prereq/fwzip/Demos/PerfomanceTest/__history/Unit1.lfm;1
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										244
									
								
								prereq/fwzip/Demos/PerfomanceTest/__history/Unit1.lfm;1
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,244 @@
 | 
			
		||||
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
 | 
			
		||||
		Reference in New Issue
	
	Block a user