object DiskDialog: TDiskDialog
  Left = 215
  Top = 102
  HelpContext = 45
  BorderStyle = bsDialog
  Caption = 'Propiedades de disco'
  ClientHeight = 373
  ClientWidth = 342
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  PixelsPerInch = 96
  Position = poScreenCenter
  OnCreate = FormCreate
  OnShow = FormShow
  TextHeight = 13
  object LabelSel: TLabelSelect
    Left = 12
    Top = 346
    Width = 45
    Height = 15
    AutoSelect = False
    BorderStyle = bsNone
    Ctl3D = False
    HideSelection = False
    ParentColor = True
    ParentCtl3D = False
    ParentShowHint = False
    ReadOnly = True
    ShowHint = True
    TabOrder = 4
    Text = 'LabelSel'
    Visible = False
  end
  object TabPanel: TTabPanel
    Left = 6
    Top = 6
    Width = 331
    Height = 332
    Tabs.Strings = (
      'General')
    TabHeight = 20
    TabIndex = 0
    Notebook = Notebook
    ParentColor = True
    TabOrder = 0
    TabStop = True
    object Notebook: TNotebook
      Left = 1
      Top = 21
      Width = 328
      Height = 309
      Align = alClient
      TabOrder = 0
      object TPage
        Left = 0
        Top = 0
        Caption = 'General'
        object DriveImage: TImage
          Left = 16
          Top = 16
          Width = 32
          Height = 32
          Cursor = -25
          OnClick = DriveImageClick
        end
        object DriveLetter: TLabel
          Left = 100
          Top = 252
          Width = 122
          Height = 13
          Alignment = taCenter
          AutoSize = False
          Caption = 'DriveLetter'
        end
        object Label1: TLabel
          Left = 64
          Top = 16
          Width = 29
          Height = 13
          Caption = 'Etiqueta:'
        end
        object Label11: TLabel
          Left = 64
          Top = 40
          Width = 27
          Height = 13
          Caption = 'Tipo:'
        end
        object DriveTypeLabel: TLabel
          Left = 120
          Top = 40
          Width = 195
          Height = 13
          Cursor = crIBeam
          AutoSize = False
          Caption = 'Desconocido'
          ShowAccelChar = False
          OnMouseDown = DriveTypeLabelMouseDown
        end
        object Label12: TLabel
          Left = 32
          Top = 148
          Width = 44
          Height = 13
          Caption = 'Capacidad:'
        end
        object DriveSize: TLabel
          Left = 120
          Top = 148
          Width = 195
          Height = 13
          Cursor = crIBeam
          AutoSize = False
          Caption = 'Desconocida'
          ParentShowHint = False
          ShowAccelChar = False
          ShowHint = True
          OnMouseDown = DriveTypeLabelMouseDown
        end
        object DriveFree: TLabel
          Left = 120
          Top = 108
          Width = 195
          Height = 13
          Cursor = crIBeam
          AutoSize = False
          Caption = 'Desconicido'
          ParentShowHint = False
          ShowAccelChar = False
          ShowHint = True
          OnMouseDown = DriveTypeLabelMouseDown
        end
        object Label13: TLabel
          Left = 32
          Top = 108
          Width = 56
          Height = 13
          Caption = 'Espacio libre:'
        end
        object Label14: TLabel
          Left = 32
          Top = 84
          Width = 60
          Height = 13
          Caption = 'Espacio utilizado:'
        end
        object DriveUsed: TLabel
          Left = 120
          Top = 84
          Width = 195
          Height = 13
          Cursor = crIBeam
          AutoSize = False
          Caption = 'Desconocido'
          ParentShowHint = False
          ShowAccelChar = False
          ShowHint = True
          OnMouseDown = DriveTypeLabelMouseDown
        end
        object Bevel1: TBevel
          Left = 12
          Top = 68
          Width = 305
          Height = 4
          Shape = bsBottomLine
        end
        object Bevel2: TBevel
          Left = 12
          Top = 132
          Width = 305
          Height = 4
          Shape = bsBottomLine
        end
        object PieChart: TWin95PieChart
          Left = 100
          Top = 176
          Width = 122
          Height = 62
          Depth = 11
          Value = 0
          Maximum = 100
          UsedColor = clBlue
          UsedShadowColor = clNavy
          FreeColor = clFuchsia
          FreeShadowColor = clPurple
          LineColor = clBlack
        end
        object VolLabel: TEdit
          Left = 122
          Top = 12
          Width = 119
          Height = 20
          CharCase = ecUpperCase
          MaxLength = 11
          OEMConvert = True
          TabOrder = 0
          OnKeyDown = VolLabelKeyDown
          OnKeyPress = VolLabelKeyPress
          OnKeyUp = VolLabelKeyUp
        end
        object Panel1: TPanel
          Left = 12
          Top = 84
          Width = 13
          Height = 13
          BevelOuter = bvLowered
          Color = clBlue
          TabOrder = 1
        end
        object Panel2: TPanel
          Left = 12
          Top = 108
          Width = 13
          Height = 13
          BevelOuter = bvLowered
          Color = clFuchsia
          TabOrder = 2
        end
      end
    end
  end
  object OKBtn: TPicBtn
    Left = 100
    Top = 344
    Width = 76
    Height = 25
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    OnClick = OKBtnClick
    Kind = bkOK
    Margin = 4
    Style = bsNew
    Spacing = -1
  end
  object CancelBtn: TPicBtn
    Left = 180
    Top = 344
    Width = 76
    Height = 25
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    Kind = bkCancel
    Margin = 4
    Style = bsNew
    Spacing = -1
  end
  object HelpBtn: TPicBtn
    Left = 260
    Top = 344
    Width = 76
    Height = 25
    Caption = 'Ayuda'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    Kind = bkHelp
    Margin = 4
    Style = bsNew
    Spacing = -1
  end
end
