Chip 2001 December/Chip_2001-12_cd1.bin/zkuste/delphi/nastroje/DISKFREE.ZIP/DiskFree.exe/0/RCDATA/TSETUPFORM/TSETUPFORM.txt

Text File | 2001-07-29 | 3.9 KB | 191 lines

object SetupForm: TSetupForm
  Left = 337
  Top = 435
  BorderStyle = bsDialog
  Caption = 'Setup Disk Free Monitor'
  ClientHeight = 257
  ClientWidth = 438
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 13
  object Button1: TButton
    Left = 12
    Top = 218
    Width = 75
    Height = 25
    Caption = 'OK'
    Default = True
    ModalResult = 1
    TabOrder = 0
  end
  object Button2: TButton
    Left = 96
    Top = 218
    Width = 75
    Height = 25
    Cancel = True
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 1
  end
  object Button3: TButton
    Left = 350
    Top = 218
    Width = 75
    Height = 25
    Caption = '&About...'
    TabOrder = 2
    OnClick = Button3Click
  end
  object GroupBox2: TGroupBox
    Left = 12
    Top = 10
    Width = 269
    Height = 193
    Caption = 'Popup menu info:'
    TabOrder = 3
    object Label5: TLabel
      Left = 12
      Top = 94
      Width = 245
      Height = 41
      AutoSize = False
      Caption =
        'The following drive types exist: fixed (harddisks and zip-drives' +
        '), CD-ROM, remote (network), removable (floppy and tape), and RA' +
        'M disk drives.'
      WordWrap = True
    end
    object Label6: TLabel
      Left = 12
      Top = 142
      Width = 245
      Height = 39
      AutoSize = False
      Caption =
        'Note: if you hold down SHIFT while selecting a drive in the popu' +
        'p menu, the drive is opened in explorer view instead of folder v' +
        'iew.'
      WordWrap = True
    end
    object RadioButton1: TRadioButton
      Left = 12
      Top = 20
      Width = 245
      Height = 17
      Caption = 'Show only &fixed drives in the popup menu'
      Checked = True
      TabOrder = 0
      TabStop = True
    end
    object RadioButton2: TRadioButton
      Left = 12
      Top = 40
      Width = 245
      Height = 17
      Caption = 'Show &all types of drives except removables'
      TabOrder = 1
    end
    object CheckBox1: TCheckBox
      Left = 12
      Top = 68
      Width = 245
      Height = 17
      Caption = 'Show &type of drives in the menu'
      TabOrder = 2
    end
  end
  object GroupBox3: TGroupBox
    Left = 296
    Top = 10
    Width = 129
    Height = 193
    Caption = 'Drive info details:'
    TabOrder = 4
    object Label2: TLabel
      Left = 16
      Top = 94
      Width = 96
      Height = 13
      Caption = '&Number of decimals:'
      FocusControl = TrackBar1
    end
    object Label1: TLabel
      Left = 22
      Top = 148
      Width = 6
      Height = 13
      Caption = '0'
    end
    object Label3: TLabel
      Left = 45
      Top = 148
      Width = 6
      Height = 13
      Caption = '1'
    end
    object Label4: TLabel
      Left = 69
      Top = 148
      Width = 6
      Height = 13
      Caption = '2'
    end
    object Label7: TLabel
      Left = 92
      Top = 148
      Width = 6
      Height = 13
      Caption = '3'
    end
    object RadioButton3: TRadioButton
      Left = 12
      Top = 20
      Width = 105
      Height = 17
      Caption = '&Kilobytes (KB)'
      Checked = True
      TabOrder = 0
      TabStop = True
    end
    object RadioButton4: TRadioButton
      Left = 12
      Top = 40
      Width = 105
      Height = 17
      Caption = '&Megabytes (MB)'
      TabOrder = 1
    end
    object RadioButton5: TRadioButton
      Left = 12
      Top = 60
      Width = 105
      Height = 17
      Caption = '&Gigabytes (GB)'
      TabOrder = 2
    end
    object TrackBar1: TTrackBar
      Left = 12
      Top = 112
      Width = 97
      Height = 37
      Max = 3
      Orientation = trHorizontal
      PageSize = 1
      Frequency = 1
      Position = 0
      SelEnd = 0
      SelStart = 0
      TabOrder = 3
      TickMarks = tmBottomRight
      TickStyle = tsAuto
    end
  end
end