home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1998 April A / Pcwk4a98.iso / PROGRAM / DELPHI16 / Calmira / Src / SRC / DISKPROP.DFM / DISKPROP.txt
Encoding:
Text File  |  1997-01-20  |  3.1 KB  |  155 lines
  1. object DiskDialog: TDiskDialog
  2.   Left = 217
  3.   Top = 112
  4.   BorderStyle = bsDialog
  5.   Caption = 'Disk properties'
  6.   ClientHeight = 280
  7.   ClientWidth = 299
  8.   Font.Color = clBlack
  9.   Font.Height = -11
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = []
  12.   PixelsPerInch = 96
  13.   Position = poScreenCenter
  14.   OnCreate = FormCreate
  15.   OnShow = FormShow
  16.   TextHeight = 13
  17.   object OKBtn: TBitBtn
  18.     Left = 218
  19.     Top = 250
  20.     Width = 77
  21.     Height = 27
  22.     Font.Color = clBlack
  23.     Font.Height = -11
  24.     Font.Name = 'MS Sans Serif'
  25.     Font.Style = []
  26.     ParentFont = False
  27.     TabOrder = 0
  28.     Kind = bkOK
  29.     Margin = 4
  30.     Style = bsNew
  31.     Spacing = -1
  32.   end
  33.   object Notebook: TTabbedNotebook
  34.     Left = 2
  35.     Top = 0
  36.     Width = 295
  37.     Height = 247
  38.     TabFont.Color = clBtnText
  39.     TabFont.Height = -11
  40.     TabFont.Name = 'MS Sans Serif'
  41.     TabFont.Style = []
  42.     TabOrder = 1
  43.     object TTabPage
  44.       Left = 5
  45.       Top = 26
  46.       Caption = 'Usage'
  47.       object Bevel1: TBevel
  48.         Left = 8
  49.         Top = 10
  50.         Width = 269
  51.         Height = 197
  52.         Shape = bsFrame
  53.       end
  54.       object Label10: TLabel
  55.         Left = 50
  56.         Top = 20
  57.         Width = 25
  58.         Height = 13
  59.         Caption = 'Drive'
  60.       end
  61.       object DriveLetter: TLabel
  62.         Left = 104
  63.         Top = 20
  64.         Width = 52
  65.         Height = 13
  66.         Caption = 'DriveLetter'
  67.       end
  68.       object Label11: TLabel
  69.         Left = 52
  70.         Top = 69
  71.         Width = 24
  72.         Height = 13
  73.         Caption = 'Type'
  74.       end
  75.       object DriveType: TLabel
  76.         Left = 104
  77.         Top = 69
  78.         Width = 46
  79.         Height = 13
  80.         Caption = 'Unknown'
  81.       end
  82.       object Label12: TLabel
  83.         Left = 56
  84.         Top = 95
  85.         Width = 20
  86.         Height = 13
  87.         Caption = 'Size'
  88.       end
  89.       object DriveSize: TLabel
  90.         Left = 104
  91.         Top = 95
  92.         Width = 46
  93.         Height = 13
  94.         Caption = 'Unknown'
  95.       end
  96.       object Label13: TLabel
  97.         Left = 24
  98.         Top = 120
  99.         Width = 53
  100.         Height = 13
  101.         Caption = 'Free space'
  102.       end
  103.       object DriveFree: TLabel
  104.         Left = 104
  105.         Top = 120
  106.         Width = 46
  107.         Height = 13
  108.         Caption = 'Unknown'
  109.       end
  110.       object Label14: TLabel
  111.         Left = 50
  112.         Top = 146
  113.         Width = 25
  114.         Height = 13
  115.         Caption = 'Used'
  116.       end
  117.       object DriveImage: TImage
  118.         Left = 235
  119.         Top = 18
  120.         Width = 33
  121.         Height = 33
  122.         Cursor = -24
  123.         OnClick = DriveImageClick
  124.       end
  125.       object Label1: TLabel
  126.         Left = 16
  127.         Top = 44
  128.         Width = 60
  129.         Height = 13
  130.         Caption = 'Volume label'
  131.       end
  132.       object VolLabel: TLabel
  133.         Left = 104
  134.         Top = 44
  135.         Width = 32
  136.         Height = 13
  137.         Caption = '(None)'
  138.       end
  139.       object Gauge: TBarGauge
  140.         Left = 22
  141.         Top = 172
  142.         Width = 241
  143.         Height = 25
  144.         Font.Color = clOlive
  145.         Font.Height = -11
  146.         Font.Name = 'MS Sans Serif'
  147.         Font.Style = [fsBold]
  148.         ForeColor = clBlue
  149.         ParentFont = False
  150.         Progress = 0
  151.       end
  152.     end
  153.   end
  154. end
  155.