object Sample0Form: TSample0Form Left = 238 Top = 173 Width = 640 Height = 483 Caption = '104-AIM-32 Sample 0' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object ExitButton: TButton Left = 560 Top = 136 Width = 65 Height = 25 Hint = 'Click here to exit this program. The DACs will remain at their ' + 'current output values after the program closes.' Caption = 'E&xit' TabOrder = 0 OnClick = ExitButtonClick end object AddrBox: TGroupBox Left = 368 Top = 8 Width = 145 Height = 57 Hint = 'Set the Base Address of the ISA board you want to use this sampl' + 'e with, in Hexadecimal.' Caption = 'Address for 104 Card' TabOrder = 1 object HexLabel: TLabel Left = 24 Top = 24 Width = 22 Height = 21 AutoSize = False Caption = 'Hex:' Layout = tlCenter end object BaseEdit: TEdit Left = 48 Top = 24 Width = 81 Height = 21 TabOrder = 0 Text = '300' end end object StartButton: TButton Left = 480 Top = 136 Width = 65 Height = 25 Caption = '&Start' TabOrder = 2 OnClick = StartButtonClick end object ChannelBox: TGroupBox Left = 8 Top = 8 Width = 353 Height = 433 Caption = 'Output' TabOrder = 3 object ChannelLabel0: TLabel Left = 16 Top = 40 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 0' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel1: TLabel Tag = 1 Left = 16 Top = 64 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 1' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel2: TLabel Tag = 2 Left = 16 Top = 88 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 2' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel3: TLabel Tag = 3 Left = 16 Top = 112 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 3' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel4: TLabel Tag = 4 Left = 16 Top = 136 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 4' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel5: TLabel Tag = 5 Left = 16 Top = 160 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 5' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel6: TLabel Tag = 6 Left = 16 Top = 184 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 6' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel7: TLabel Tag = 7 Left = 16 Top = 208 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 7' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel8: TLabel Left = 16 Top = 232 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 8' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel9: TLabel Tag = 1 Left = 16 Top = 256 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 9' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel10: TLabel Tag = 2 Left = 16 Top = 280 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 10' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel11: TLabel Tag = 3 Left = 16 Top = 304 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 11' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel12: TLabel Tag = 4 Left = 16 Top = 328 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 12' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel13: TLabel Tag = 5 Left = 16 Top = 352 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 13' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel14: TLabel Tag = 6 Left = 16 Top = 376 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 14' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel15: TLabel Tag = 7 Left = 16 Top = 400 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 15' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel16: TLabel Left = 192 Top = 40 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 16' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel17: TLabel Tag = 1 Left = 192 Top = 64 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 17' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel18: TLabel Tag = 2 Left = 192 Top = 88 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 18' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel19: TLabel Tag = 3 Left = 192 Top = 112 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 19' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel20: TLabel Tag = 4 Left = 192 Top = 136 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 20' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel21: TLabel Tag = 5 Left = 192 Top = 160 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 21' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel22: TLabel Tag = 6 Left = 192 Top = 184 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 22' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel23: TLabel Tag = 7 Left = 192 Top = 208 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 23' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel24: TLabel Left = 192 Top = 232 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 24' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel25: TLabel Tag = 1 Left = 192 Top = 256 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 25' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel26: TLabel Tag = 2 Left = 192 Top = 280 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 26' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel27: TLabel Tag = 3 Left = 192 Top = 304 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 27' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel28: TLabel Tag = 4 Left = 192 Top = 328 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 28' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel29: TLabel Tag = 5 Left = 192 Top = 352 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 29' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel30: TLabel Tag = 6 Left = 192 Top = 376 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 30' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel31: TLabel Tag = 7 Left = 192 Top = 400 Width = 77 Height = 15 AutoSize = False Caption = 'Channel 31' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object Volts2Label: TLabel Left = 272 Top = 16 Width = 77 Height = 13 Alignment = taCenter AutoSize = False Caption = 'Volts' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object VoltsLabel16: TLabel Left = 272 Top = 40 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel25: TLabel Left = 272 Top = 256 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel27: TLabel Left = 272 Top = 304 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel28: TLabel Left = 272 Top = 328 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel29: TLabel Left = 272 Top = 352 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel30: TLabel Left = 272 Top = 376 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel31: TLabel Left = 272 Top = 400 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel26: TLabel Left = 272 Top = 280 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel24: TLabel Left = 272 Top = 232 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel23: TLabel Left = 272 Top = 208 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel21: TLabel Left = 272 Top = 160 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel22: TLabel Left = 272 Top = 184 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel19: TLabel Left = 272 Top = 112 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel18: TLabel Left = 272 Top = 88 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel17: TLabel Left = 272 Top = 64 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel20: TLabel Left = 272 Top = 136 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object ChannelLabel: TLabel Left = 16 Top = 16 Width = 47 Height = 13 Alignment = taCenter AutoSize = False Caption = 'Channel' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Channel2Label: TLabel Left = 192 Top = 16 Width = 47 Height = 13 Alignment = taCenter AutoSize = False Caption = 'Channel' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object VoltsLabel: TLabel Left = 96 Top = 16 Width = 77 Height = 13 Alignment = taCenter AutoSize = False Caption = 'Volts' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object VoltsLabel0: TLabel Left = 96 Top = 40 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel11: TLabel Left = 96 Top = 304 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel12: TLabel Left = 96 Top = 328 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel13: TLabel Left = 96 Top = 352 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel14: TLabel Left = 96 Top = 376 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel15: TLabel Left = 96 Top = 400 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel1: TLabel Left = 96 Top = 64 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel2: TLabel Left = 96 Top = 88 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel3: TLabel Left = 96 Top = 112 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel4: TLabel Left = 96 Top = 136 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel5: TLabel Left = 96 Top = 160 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel6: TLabel Left = 96 Top = 184 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel7: TLabel Left = 96 Top = 208 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel8: TLabel Left = 96 Top = 232 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel9: TLabel Left = 96 Top = 256 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end object VoltsLabel10: TLabel Left = 96 Top = 280 Width = 77 Height = 15 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ParentFont = False Layout = tlCenter end end object AIMAddrBox: TGroupBox Left = 368 Top = 72 Width = 145 Height = 57 Hint = 'Set the Base Address of the ISA board you want to use this sampl' + 'e with, in Hexadecimal.' Caption = 'Address for 104-AIM-32' TabOrder = 4 object Hex2Label: TLabel Left = 24 Top = 24 Width = 22 Height = 21 AutoSize = False Caption = 'Hex:' Layout = tlCenter end object AIM32Edit: TEdit Left = 48 Top = 24 Width = 81 Height = 21 TabOrder = 0 Text = '320' end end object EndGroup: TRadioGroup Left = 528 Top = 72 Width = 97 Height = 57 Caption = 'S.E./Diff.' ItemIndex = 0 Items.Strings = ( 'Single Ended' 'Differential') TabOrder = 5 OnClick = EndGroupClick end object GainGroup: TGroupBox Left = 528 Top = 8 Width = 97 Height = 57 Caption = 'Gain' TabOrder = 6 object GainComboBox: TComboBox Left = 16 Top = 24 Width = 65 Height = 21 DropDownCount = 6 ItemHeight = 13 TabOrder = 0 Text = '0.5' OnChange = GainComboBoxChange Items.Strings = ( '0.5' '1' '2' '50' '100' '200') end end object Instructions: TMemo Left = 368 Top = 168 Width = 257 Height = 273 Lines.Strings = ( 'Instructions:' 'Enter the correct base address for the 104-AIO12-8 ' 'in the appopriate edit box.' 'Enter the correct base address for the 104-AIM-32 in ' 'the appropriate edit box.' '' 'Select the Gain, Mode and Single Ended or ' 'Differential that you want, then click the "Start" ' 'button.') TabOrder = 7 end object TestTimer: TTimer Enabled = False Interval = 500 OnTimer = TestTimerTimer Left = 368 Top = 136 end end