object StatusForm: TStatusForm
  Left = 106
  Top = 58
  ActiveControl = CancelBtn
  BorderIcons = []
  BorderStyle = bsSingle
  Caption = 'Formatting'
  ClientHeight = 122
  ClientWidth = 305
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  PixelsPerInch = 96
  Position = poScreenCenter
  TextHeight = 13
  object Label1: TLabel
    Left = 11
    Top = 14
    Width = 128
    Height = 13
    Hint = 'Verification increases formatting time'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label2: TLabel
    Left = 12
    Top = 32
    Width = 129
    Height = 13
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Gauge1: TGauge
    Left = 12
    Top = 52
    Width = 279
    Height = 22
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ForeColor = clNavy
    ParentFont = False
    Progress = 0
  end
  object CancelBtn: TBitBtn
    Left = 108
    Top = 80
    Width = 89
    Height = 33
    Hint = 'Cancel formatting'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 0
    OnClick = CancelBtnClick
    Kind = bkCancel
  end
end