home *** CD-ROM | disk | FTP | other *** search
/ GameStar 2005 January / Gamestar_69_2005-01_dvd.iso / Programy / enpm800retaildemo.exe / Setup / PMagic.cab / PMagicNT.exe / 0 / RCDATA / TDLGCLUSTANALYSIS / TDLGCLUSTANALYSIS.txt
Text File  |  2002-09-16  |  16KB  |  799 lines

  1. object dlgClustAnalysis: TdlgClustAnalysis
  2.   Left = 614
  3.   Top = 122
  4.   BorderIcons = [biSystemMenu]
  5.   BorderStyle = bsDialog
  6.   Caption = 'Resize Clusters'
  7.   ClientHeight = 346
  8.   ClientWidth = 510
  9.   Color = clBtnFace
  10.   Font.Charset = DEFAULT_CHARSET
  11.   Font.Color = clWindowText
  12.   Font.Height = -11
  13.   Font.Name = 'MS Sans Serif'
  14.   Font.Style = []
  15.   OldCreateOrder = False
  16.   Position = poScreenCenter
  17.   OnCreate = FormCreate
  18.   OnDestroy = FormDestroy
  19.   PixelsPerInch = 96
  20.   TextHeight = 13
  21.   object lblClustSize: TIntlLabel
  22.     Left = 13
  23.     Top = 11
  24.     Width = 211
  25.     Height = 13
  26.     Caption = 'Cluster Size'
  27.     Font.Charset = DEFAULT_CHARSET
  28.     Font.Color = clBlack
  29.     Font.Height = -11
  30.     Font.Name = 'MS Sans Serif'
  31.     Font.Style = [fsBold]
  32.     ParentFont = False
  33.   end
  34.   object lblUsed: TIntlLabel
  35.     Left = 148
  36.     Top = 11
  37.     Width = 177
  38.     Height = 13
  39.     Caption = 'Used'
  40.     Font.Charset = DEFAULT_CHARSET
  41.     Font.Color = clBlack
  42.     Font.Height = -11
  43.     Font.Name = 'MS Sans Serif'
  44.     Font.Style = [fsBold]
  45.     ParentFont = False
  46.   end
  47.   object lblWasted: TIntlLabel
  48.     Left = 217
  49.     Top = 11
  50.     Width = 196
  51.     Height = 13
  52.     Caption = 'Wasted'
  53.     Font.Charset = DEFAULT_CHARSET
  54.     Font.Color = clBlack
  55.     Font.Height = -11
  56.     Font.Name = 'MS Sans Serif'
  57.     Font.Style = [fsBold]
  58.     ParentFont = False
  59.   end
  60.   object lblWastedMB: TIntlLabel
  61.     Left = 324
  62.     Top = 11
  63.     Width = 214
  64.     Height = 13
  65.     Caption = 'Wasted'
  66.     Font.Charset = DEFAULT_CHARSET
  67.     Font.Color = clBlack
  68.     Font.Height = -11
  69.     Font.Name = 'MS Sans Serif'
  70.     Font.Style = [fsBold]
  71.     ParentFont = False
  72.   end
  73.   object lblPartSize: TIntlLabel
  74.     Left = 392
  75.     Top = 11
  76.     Width = 204
  77.     Height = 13
  78.     Caption = 'Notes'
  79.     Font.Charset = DEFAULT_CHARSET
  80.     Font.Color = clBlack
  81.     Font.Height = -11
  82.     Font.Name = 'MS Sans Serif'
  83.     Font.Style = [fsBold]
  84.     ParentFont = False
  85.   end
  86.   object lbl512: TIntlLabel
  87.     Left = 29
  88.     Top = 43
  89.     Width = 18
  90.     Height = 13
  91.     Caption = '512'
  92.   end
  93.   object lbl1K: TIntlLabel
  94.     Left = 29
  95.     Top = 67
  96.     Width = 16
  97.     Height = 13
  98.     Caption = '1 K'
  99.   end
  100.   object lbl2K: TIntlLabel
  101.     Left = 29
  102.     Top = 91
  103.     Width = 16
  104.     Height = 13
  105.     Caption = '2 K'
  106.   end
  107.   object lbl4K: TIntlLabel
  108.     Left = 29
  109.     Top = 115
  110.     Width = 16
  111.     Height = 13
  112.     Caption = '4 K'
  113.   end
  114.   object lbl8K: TIntlLabel
  115.     Left = 29
  116.     Top = 139
  117.     Width = 16
  118.     Height = 13
  119.     Caption = '8 K'
  120.   end
  121.   object lbl16K: TIntlLabel
  122.     Left = 29
  123.     Top = 163
  124.     Width = 22
  125.     Height = 13
  126.     Caption = '16 K'
  127.   end
  128.   object lbl32K: TIntlLabel
  129.     Left = 29
  130.     Top = 187
  131.     Width = 22
  132.     Height = 13
  133.     Caption = '32 K'
  134.   end
  135.   object lbl64K: TIntlLabel
  136.     Left = 29
  137.     Top = 211
  138.     Width = 22
  139.     Height = 13
  140.     Caption = '64 K'
  141.   end
  142.   object lblWasted512: TIntlLabel
  143.     Left = 183
  144.     Top = 43
  145.     Width = 189
  146.     Height = 13
  147.     Alignment = taRightJustify
  148.     Caption = '0.0 MB'
  149.   end
  150.   object lblWasted1K: TIntlLabel
  151.     Left = 188
  152.     Top = 67
  153.     Width = 184
  154.     Height = 13
  155.     Alignment = taRightJustify
  156.     Caption = '0.0 MB'
  157.   end
  158.   object lblWasted2K: TIntlLabel
  159.     Left = 188
  160.     Top = 91
  161.     Width = 184
  162.     Height = 13
  163.     Alignment = taRightJustify
  164.     Caption = '0.0 MB'
  165.   end
  166.   object lblWasted4K: TIntlLabel
  167.     Left = 188
  168.     Top = 115
  169.     Width = 184
  170.     Height = 13
  171.     Alignment = taRightJustify
  172.     Caption = '0.0 MB'
  173.   end
  174.   object lblWasted8K: TIntlLabel
  175.     Left = 188
  176.     Top = 139
  177.     Width = 184
  178.     Height = 13
  179.     Alignment = taRightJustify
  180.     Caption = '0.0 MB'
  181.   end
  182.   object lblWasted16K: TIntlLabel
  183.     Left = 182
  184.     Top = 163
  185.     Width = 190
  186.     Height = 13
  187.     Alignment = taRightJustify
  188.     Caption = '0.0 MB'
  189.   end
  190.   object lblWasted32K: TIntlLabel
  191.     Left = 182
  192.     Top = 187
  193.     Width = 190
  194.     Height = 13
  195.     Alignment = taRightJustify
  196.     Caption = '0.0 MB'
  197.   end
  198.   object lblWasted64K: TIntlLabel
  199.     Left = 182
  200.     Top = 211
  201.     Width = 190
  202.     Height = 13
  203.     Alignment = taRightJustify
  204.     Caption = '0.0 MB'
  205.   end
  206.   object lblPartSize512: TIntlLabel
  207.     Left = 393
  208.     Top = 43
  209.     Width = 195
  210.     Height = 13
  211.     Caption = 'Not Available'
  212.   end
  213.   object lblPartSize1K: TIntlLabel
  214.     Left = 393
  215.     Top = 67
  216.     Width = 190
  217.     Height = 13
  218.     Caption = 'Too Much Data'
  219.   end
  220.   object lblPartSize2K: TIntlLabel
  221.     Left = 393
  222.     Top = 91
  223.     Width = 190
  224.     Height = 13
  225.     Caption = 'Too Much Data'
  226.   end
  227.   object lblPartSize4K: TIntlLabel
  228.     Left = 393
  229.     Top = 115
  230.     Width = 190
  231.     Height = 13
  232.     Caption = 'Too Much Data'
  233.   end
  234.   object lblPartSize8K: TIntlLabel
  235.     Left = 393
  236.     Top = 139
  237.     Width = 190
  238.     Height = 13
  239.     Caption = 'Too Much Data'
  240.   end
  241.   object lblPartSize16K: TIntlLabel
  242.     Left = 393
  243.     Top = 163
  244.     Width = 196
  245.     Height = 13
  246.     Caption = 'Too Much Data'
  247.   end
  248.   object lblPartSize32K: TIntlLabel
  249.     Left = 393
  250.     Top = 187
  251.     Width = 196
  252.     Height = 13
  253.     Caption = 'Too Much Data'
  254.   end
  255.   object lblPartSize64K: TIntlLabel
  256.     Left = 393
  257.     Top = 211
  258.     Width = 196
  259.     Height = 13
  260.     Caption = 'Too Much Waste'
  261.   end
  262.   object lblCurClustSize: TIntlLabel
  263.     Left = 36
  264.     Top = 257
  265.     Width = 206
  266.     Height = 13
  267.     Caption = 'Current cluster size:'
  268.   end
  269.   object lblNewClustSize: TIntlLabel
  270.     Left = 248
  271.     Top = 257
  272.     Width = 209
  273.     Height = 13
  274.     Caption = '&New cluster size:'
  275.     FocusControl = cbxClustSize
  276.   end
  277.   object lblCurClustSizeVal: TIntlLabel
  278.     Left = 155
  279.     Top = 257
  280.     Width = 16
  281.     Height = 13
  282.     Caption = '0 K'
  283.   end
  284.   object lblCurPartSize: TIntlLabel
  285.     Left = 36
  286.     Top = 279
  287.     Width = 200
  288.     Height = 13
  289.     Caption = 'Current partition size:'
  290.   end
  291.   object lblNewPartSize: TIntlLabel
  292.     Left = 248
  293.     Top = 279
  294.     Width = 203
  295.     Height = 13
  296.     Caption = 'New partition size:'
  297.   end
  298.   object lblCurPartSizeVal: TIntlLabel
  299.     Left = 155
  300.     Top = 279
  301.     Width = 220
  302.     Height = 13
  303.     Caption = '0.0 MB'
  304.   end
  305.   object lblNewPartSizeVal: TIntlLabel
  306.     Left = 364
  307.     Top = 279
  308.     Width = 223
  309.     Height = 13
  310.     Caption = '0.0 MB'
  311.   end
  312.   object btnOK: TButton
  313.     Left = 124
  314.     Top = 313
  315.     Width = 75
  316.     Height = 25
  317.     Caption = '&OK'
  318.     Default = True
  319.     TabOrder = 1
  320.     OnClick = btnOKClick
  321.   end
  322.   object btnCancel: TButton
  323.     Left = 220
  324.     Top = 313
  325.     Width = 75
  326.     Height = 25
  327.     Cancel = True
  328.     Caption = '&Cancel'
  329.     TabOrder = 2
  330.     OnClick = btnCancelClick
  331.   end
  332.   object btnHelp: TButton
  333.     Left = 316
  334.     Top = 313
  335.     Width = 75
  336.     Height = 25
  337.     Caption = '&Help'
  338.     TabOrder = 3
  339.     OnClick = btnHelpClick
  340.   end
  341.   object pnlSeparator: TPanel
  342.     Left = 19
  343.     Top = 239
  344.     Width = 470
  345.     Height = 3
  346.     BevelOuter = bvLowered
  347.     TabOrder = 4
  348.   end
  349.   object cbxClustSize: TComboBox
  350.     Left = 364
  351.     Top = 251
  352.     Width = 85
  353.     Height = 21
  354.     Style = csDropDownList
  355.     ItemHeight = 13
  356.     TabOrder = 0
  357.     OnChange = cbxClustSizeChange
  358.   end
  359.   object lpnUsed: TLegendPanel
  360.     Left = 123
  361.     Top = 7
  362.     Width = 15
  363.     Height = 18
  364.     Color = clBlue
  365.     ParentColor = False
  366.     TabOrder = 5
  367.   end
  368.   object lpnWasted: TLegendPanel
  369.     Left = 192
  370.     Top = 7
  371.     Width = 15
  372.     Height = 18
  373.     Color = clAqua
  374.     ParentColor = False
  375.     TabOrder = 6
  376.   end
  377.   object pnl512Bar: TPanel
  378.     Left = 67
  379.     Top = 37
  380.     Width = 225
  381.     Height = 19
  382.     BevelOuter = bvNone
  383.     BevelWidth = 2
  384.     BorderStyle = bsSingle
  385.     Color = clGray
  386.     Ctl3D = False
  387.     Enabled = False
  388.     ParentCtl3D = False
  389.     TabOrder = 7
  390.     object pnl512BarWaste: TPanel
  391.       Left = 116
  392.       Top = 0
  393.       Width = 107
  394.       Height = 17
  395.       Align = alRight
  396.       BevelOuter = bvNone
  397.       Caption = '50%'
  398.       Color = clAqua
  399.       Enabled = False
  400.       Font.Charset = ANSI_CHARSET
  401.       Font.Color = clBlack
  402.       Font.Height = -11
  403.       Font.Name = 'MS Sans Serif'
  404.       Font.Style = []
  405.       ParentFont = False
  406.       TabOrder = 0
  407.     end
  408.     object pnl512BarUsed: TPanel
  409.       Left = 0
  410.       Top = 0
  411.       Width = 116
  412.       Height = 17
  413.       Align = alClient
  414.       BevelOuter = bvNone
  415.       Caption = '50%'
  416.       Color = clBlue
  417.       Enabled = False
  418.       Font.Charset = ANSI_CHARSET
  419.       Font.Color = clWhite
  420.       Font.Height = -11
  421.       Font.Name = 'MS Sans Serif'
  422.       Font.Style = []
  423.       ParentFont = False
  424.       TabOrder = 1
  425.     end
  426.   end
  427.   object pnl1KBar: TPanel
  428.     Tag = 1
  429.     Left = 67
  430.     Top = 61
  431.     Width = 225
  432.     Height = 19
  433.     BevelOuter = bvNone
  434.     BevelWidth = 2
  435.     BorderStyle = bsSingle
  436.     Color = clGray
  437.     Ctl3D = False
  438.     Enabled = False
  439.     ParentCtl3D = False
  440.     TabOrder = 8
  441.     object pnl1KBarWaste: TPanel
  442.       Tag = 1
  443.       Left = 116
  444.       Top = 0
  445.       Width = 107
  446.       Height = 17
  447.       Align = alRight
  448.       BevelOuter = bvNone
  449.       Caption = '50%'
  450.       Color = clAqua
  451.       Enabled = False
  452.       Font.Charset = ANSI_CHARSET
  453.       Font.Color = clBlack
  454.       Font.Height = -11
  455.       Font.Name = 'MS Sans Serif'
  456.       Font.Style = []
  457.       ParentFont = False
  458.       TabOrder = 0
  459.     end
  460.     object pnl1KBarUsed: TPanel
  461.       Tag = 1
  462.       Left = 0
  463.       Top = 0
  464.       Width = 116
  465.       Height = 17
  466.       Align = alClient
  467.       BevelOuter = bvNone
  468.       Caption = '50%'
  469.       Color = clBlue
  470.       Enabled = False
  471.       Font.Charset = ANSI_CHARSET
  472.       Font.Color = clWhite
  473.       Font.Height = -11
  474.       Font.Name = 'MS Sans Serif'
  475.       Font.Style = []
  476.       ParentFont = False
  477.       TabOrder = 1
  478.     end
  479.   end
  480.   object pnl2KBar: TPanel
  481.     Tag = 2
  482.     Left = 67
  483.     Top = 85
  484.     Width = 225
  485.     Height = 19
  486.     BevelOuter = bvNone
  487.     BevelWidth = 2
  488.     BorderStyle = bsSingle
  489.     Color = clGray
  490.     Ctl3D = False
  491.     Enabled = False
  492.     ParentCtl3D = False
  493.     TabOrder = 9
  494.     object pnl2KBarWaste: TPanel
  495.       Tag = 2
  496.       Left = 116
  497.       Top = 0
  498.       Width = 107
  499.       Height = 17
  500.       Align = alRight
  501.       BevelOuter = bvNone
  502.       Caption = '50%'
  503.       Color = clAqua
  504.       Enabled = False
  505.       Font.Charset = ANSI_CHARSET
  506.       Font.Color = clBlack
  507.       Font.Height = -11
  508.       Font.Name = 'MS Sans Serif'
  509.       Font.Style = []
  510.       ParentFont = False
  511.       TabOrder = 0
  512.     end
  513.     object pnl2KBarUsed: TPanel
  514.       Tag = 2
  515.       Left = 0
  516.       Top = 0
  517.       Width = 116
  518.       Height = 17
  519.       Align = alClient
  520.       BevelOuter = bvNone
  521.       Caption = '50%'
  522.       Color = clBlue
  523.       Enabled = False
  524.       Font.Charset = ANSI_CHARSET
  525.       Font.Color = clWhite
  526.       Font.Height = -11
  527.       Font.Name = 'MS Sans Serif'
  528.       Font.Style = []
  529.       ParentFont = False
  530.       TabOrder = 1
  531.     end
  532.   end
  533.   object pnl4KBar: TPanel
  534.     Tag = 3
  535.     Left = 67
  536.     Top = 109
  537.     Width = 225
  538.     Height = 19
  539.     BevelOuter = bvNone
  540.     BevelWidth = 2
  541.     BorderStyle = bsSingle
  542.     Color = clGray
  543.     Ctl3D = False
  544.     Enabled = False
  545.     ParentCtl3D = False
  546.     TabOrder = 10
  547.     object pnl4KBarWaste: TPanel
  548.       Tag = 3
  549.       Left = 116
  550.       Top = 0
  551.       Width = 107
  552.       Height = 17
  553.       Align = alRight
  554.       BevelOuter = bvNone
  555.       Caption = '50%'
  556.       Color = clAqua
  557.       Enabled = False
  558.       Font.Charset = ANSI_CHARSET
  559.       Font.Color = clBlack
  560.       Font.Height = -11
  561.       Font.Name = 'MS Sans Serif'
  562.       Font.Style = []
  563.       ParentFont = False
  564.       TabOrder = 0
  565.     end
  566.     object pnl4KBarUsed: TPanel
  567.       Tag = 3
  568.       Left = 0
  569.       Top = 0
  570.       Width = 116
  571.       Height = 17
  572.       Align = alClient
  573.       BevelOuter = bvNone
  574.       Caption = '50%'
  575.       Color = clBlue
  576.       Enabled = False
  577.       Font.Charset = ANSI_CHARSET
  578.       Font.Color = clWhite
  579.       Font.Height = -11
  580.       Font.Name = 'MS Sans Serif'
  581.       Font.Style = []
  582.       ParentFont = False
  583.       TabOrder = 1
  584.     end
  585.   end
  586.   object pnl8KBar: TPanel
  587.     Tag = 4
  588.     Left = 67
  589.     Top = 133
  590.     Width = 225
  591.     Height = 19
  592.     BevelOuter = bvNone
  593.     BevelWidth = 2
  594.     BorderStyle = bsSingle
  595.     Color = clGray
  596.     Ctl3D = False
  597.     Enabled = False
  598.     ParentCtl3D = False
  599.     TabOrder = 11
  600.     object pnl8KBarWaste: TPanel
  601.       Tag = 4
  602.       Left = 116
  603.       Top = 0
  604.       Width = 107
  605.       Height = 17
  606.       Align = alRight
  607.       BevelOuter = bvNone
  608.       Caption = '50%'
  609.       Color = clAqua
  610.       Enabled = False
  611.       Font.Charset = ANSI_CHARSET
  612.       Font.Color = clBlack
  613.       Font.Height = -11
  614.       Font.Name = 'MS Sans Serif'
  615.       Font.Style = []
  616.       ParentFont = False
  617.       TabOrder = 0
  618.     end
  619.     object pnl8KBarUsed: TPanel
  620.       Tag = 4
  621.       Left = 0
  622.       Top = 0
  623.       Width = 116
  624.       Height = 17
  625.       Align = alClient
  626.       BevelOuter = bvNone
  627.       Caption = '50%'
  628.       Color = clBlue
  629.       Enabled = False
  630.       Font.Charset = ANSI_CHARSET
  631.       Font.Color = clWhite
  632.       Font.Height = -11
  633.       Font.Name = 'MS Sans Serif'
  634.       Font.Style = []
  635.       ParentFont = False
  636.       TabOrder = 1
  637.     end
  638.   end
  639.   object pnl16KBar: TPanel
  640.     Tag = 5
  641.     Left = 67
  642.     Top = 157
  643.     Width = 225
  644.     Height = 19
  645.     BevelOuter = bvNone
  646.     BevelWidth = 2
  647.     BorderStyle = bsSingle
  648.     Color = clGray
  649.     Ctl3D = False
  650.     Enabled = False
  651.     ParentCtl3D = False
  652.     TabOrder = 12
  653.     object pnl16KBarWaste: TPanel
  654.       Tag = 5
  655.       Left = 116
  656.       Top = 0
  657.       Width = 107
  658.       Height = 17
  659.       Align = alRight
  660.       BevelOuter = bvNone
  661.       Caption = '50%'
  662.       Color = clAqua
  663.       Enabled = False
  664.       Font.Charset = ANSI_CHARSET
  665.       Font.Color = clBlack
  666.       Font.Height = -11
  667.       Font.Name = 'MS Sans Serif'
  668.       Font.Style = []
  669.       ParentFont = False
  670.       TabOrder = 0
  671.     end
  672.     object pnl16KBarUsed: TPanel
  673.       Tag = 5
  674.       Left = 0
  675.       Top = 0
  676.       Width = 116
  677.       Height = 17
  678.       Align = alClient
  679.       BevelOuter = bvNone
  680.       Caption = '50%'
  681.       Color = clBlue
  682.       Enabled = False
  683.       Font.Charset = ANSI_CHARSET
  684.       Font.Color = clWhite
  685.       Font.Height = -11
  686.       Font.Name = 'MS Sans Serif'
  687.       Font.Style = []
  688.       ParentFont = False
  689.       TabOrder = 1
  690.     end
  691.   end
  692.   object pnl32KBar: TPanel
  693.     Tag = 6
  694.     Left = 67
  695.     Top = 181
  696.     Width = 225
  697.     Height = 19
  698.     BevelOuter = bvNone
  699.     BevelWidth = 2
  700.     BorderStyle = bsSingle
  701.     Color = clGray
  702.     Ctl3D = False
  703.     Enabled = False
  704.     ParentCtl3D = False
  705.     TabOrder = 13
  706.     object pnl32KBarWaste: TPanel
  707.       Tag = 6
  708.       Left = 116
  709.       Top = 0
  710.       Width = 107
  711.       Height = 17
  712.       Align = alRight
  713.       BevelOuter = bvNone
  714.       Caption = '50%'
  715.       Color = clAqua
  716.       Enabled = False
  717.       Font.Charset = ANSI_CHARSET
  718.       Font.Color = clBlack
  719.       Font.Height = -11
  720.       Font.Name = 'MS Sans Serif'
  721.       Font.Style = []
  722.       ParentFont = False
  723.       TabOrder = 0
  724.     end
  725.     object pnl32KBarUsed: TPanel
  726.       Tag = 6
  727.       Left = 0
  728.       Top = 0
  729.       Width = 116
  730.       Height = 17
  731.       Align = alClient
  732.       BevelOuter = bvNone
  733.       Caption = '50%'
  734.       Color = clBlue
  735.       Enabled = False
  736.       Font.Charset = ANSI_CHARSET
  737.       Font.Color = clWhite
  738.       Font.Height = -11
  739.       Font.Name = 'MS Sans Serif'
  740.       Font.Style = []
  741.       ParentFont = False
  742.       TabOrder = 1
  743.     end
  744.   end
  745.   object pnl64KBar: TPanel
  746.     Tag = 7
  747.     Left = 67
  748.     Top = 205
  749.     Width = 225
  750.     Height = 19
  751.     BevelOuter = bvNone
  752.     BevelWidth = 2
  753.     BorderStyle = bsSingle
  754.     Color = clGray
  755.     Ctl3D = False
  756.     Enabled = False
  757.     ParentCtl3D = False
  758.     TabOrder = 14
  759.     object pnl64KBarWaste: TPanel
  760.       Tag = 7
  761.       Left = 116
  762.       Top = 0
  763.       Width = 107
  764.       Height = 17
  765.       Align = alRight
  766.       BevelOuter = bvNone
  767.       Caption = '50%'
  768.       Color = clAqua
  769.       Enabled = False
  770.       Font.Charset = ANSI_CHARSET
  771.       Font.Color = clBlack
  772.       Font.Height = -11
  773.       Font.Name = 'MS Sans Serif'
  774.       Font.Style = []
  775.       ParentFont = False
  776.       TabOrder = 0
  777.     end
  778.     object pnl64KBarUsed: TPanel
  779.       Tag = 7
  780.       Left = 0
  781.       Top = 0
  782.       Width = 116
  783.       Height = 17
  784.       Align = alClient
  785.       BevelOuter = bvNone
  786.       Caption = '50%'
  787.       Color = clBlue
  788.       Enabled = False
  789.       Font.Charset = ANSI_CHARSET
  790.       Font.Color = clWhite
  791.       Font.Height = -11
  792.       Font.Name = 'MS Sans Serif'
  793.       Font.Style = []
  794.       ParentFont = False
  795.       TabOrder = 1
  796.     end
  797.   end
  798. end
  799.