object Form2: TForm2 Left = 636 Top = 418 BorderIcons = [] BorderStyle = bsDialog Caption = 'CD Tach Configuration' ClientHeight = 272 ClientWidth = 376 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Label2: TLabel Left = 4 Top = 91 Width = 37 Height = 13 Caption = 'Log File' end object Label3: TLabel Left = 4 Top = 121 Width = 58 Height = 13 Caption = 'Test Passes' end object GroupBox1: TGroupBox Left = 4 Top = 9 Width = 81 Height = 57 Caption = 'Read Tests' TabOrder = 0 object read16: TCheckBox Left = 8 Top = 16 Width = 69 Height = 17 Caption = '16k block' TabOrder = 0 OnClick = read16Click end object read2: TCheckBox Left = 8 Top = 32 Width = 61 Height = 17 Caption = '2k block' TabOrder = 1 end end object GroupBox2: TGroupBox Left = 100 Top = 9 Width = 121 Height = 57 Caption = 'Seek/Read Tests' TabOrder = 1 object seekfull: TCheckBox Left = 8 Top = 16 Width = 77 Height = 17 Caption = 'Full Stroke' TabOrder = 0 end object seekrand: TCheckBox Left = 8 Top = 32 Width = 105 Height = 17 Caption = 'Random Access' TabOrder = 1 end end object GroupBox3: TGroupBox Left = 232 Top = 9 Width = 141 Height = 124 Caption = 'CPU Tests' TabOrder = 2 object Label1: TLabel Left = 116 Top = 100 Width = 17 Height = 13 Caption = 'kps' end object cpu2x: TCheckBox Left = 8 Top = 16 Width = 77 Height = 17 Caption = '2X 300kps' TabOrder = 0 end object cpu4x: TCheckBox Left = 8 Top = 32 Width = 77 Height = 17 Caption = '4X 600kps' TabOrder = 1 end object cpu6x: TCheckBox Left = 8 Top = 48 Width = 77 Height = 17 Caption = '6X 900kps' TabOrder = 2 end object cpu8x: TCheckBox Left = 8 Top = 64 Width = 77 Height = 17 Caption = '8X 1200kps' TabOrder = 3 end object userval: TEdit Left = 58 Top = 97 Width = 53 Height = 21 TabOrder = 4 end object cpuuser: TCheckBox Left = 8 Top = 99 Width = 49 Height = 17 Caption = 'User' TabOrder = 5 end object cpu12x: TCheckBox Left = 8 Top = 80 Width = 77 Height = 17 Caption = '12X 1800kps' TabOrder = 6 end end object Button1: TButton Left = 312 Top = 239 Width = 61 Height = 25 Caption = 'Reset' TabOrder = 3 OnClick = Button1Click end object Button2: TButton Left = 232 Top = 239 Width = 55 Height = 25 Caption = 'Ok' Default = True TabOrder = 4 OnClick = Button2Click end object Memo1: TMemo Left = 4 Top = 166 Width = 217 Height = 101 TabStop = False Lines.Strings = ( 'CPU testing can not be performed unless the ' 'read 16k block test is selected. CPU tests ' 'that are beyond the capabilities of the drive ' 'will not be performed. User defined CPU test ' 'speeds must be an even number, as the ' 'actual testing is done in sectors per second, ' 'not kilobytes per second.') ReadOnly = True TabOrder = 5 WantReturns = False end object GroupBox4: TGroupBox Left = 232 Top = 143 Width = 141 Height = 73 Caption = 'Buffer Tests' TabOrder = 6 object burst2k: TCheckBox Left = 8 Top = 16 Width = 65 Height = 17 Caption = '2k burst' TabOrder = 0 end object burst8k: TCheckBox Left = 8 Top = 32 Width = 69 Height = 17 Caption = '8k burst' TabOrder = 1 end object burst16k: TCheckBox Left = 8 Top = 48 Width = 73 Height = 17 Caption = '16k burst' TabOrder = 2 end end object LogEdit: TEdit Left = 48 Top = 87 Width = 137 Height = 21 TabOrder = 7 end object BitBtn1: TBitBtn Left = 196 Top = 85 Width = 25 Height = 25 TabOrder = 8 OnClick = BitBtn1Click Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333 333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000 0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF 07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF 07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF 0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0 33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333 3BB33773333773333773B333333B3333333B7333333733333337} NumGlyphs = 2 end object PassEdit: TEdit Left = 68 Top = 117 Width = 37 Height = 21 TabOrder = 9 Text = '1' end object SaveDialog1: TSaveDialog DefaultExt = 'log' FileEditStyle = fsEdit FileName = 'cdtach' Options = [ofPathMustExist] Title = 'Save Log File As' Left = 148 Top = 113 end end