object Sample0Form: TSample0Form Left = 464 Top = 252 Width = 393 Height = 533 Caption = 'Sample 0' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object TitleLabel: TLabel Tag = 99 Left = 18 Top = 122 Width = 350 Height = 14 Alignment = taCenter Caption = ' Channel Data Read ' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Courier New' Font.Style = [fsBold] ParentFont = False end object CardName: TLabel Left = 0 Top = 0 Width = 385 Height = 20 Hint = 'If a PCI DAC card was installed, this would show the product nam' + 'e.' Align = alTop Alignment = taCenter Caption = 'A12-16E' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Memo1: TMemo Left = 8 Top = 24 Width = 369 Height = 89 TabStop = False Color = clBtnFace Lines.Strings = ( 'Sample 0' 'This sample will read data from all sixteen channels on the A/D ' + 'card.' 'Board Configuration Requirements:' 'CHANNEL SELECTION: 16 Channel Single-Ended' 'Please enter the base address (in hex) in the text box below, an' + 'd click the ' #39'Start Test'#39' button to begin.') ReadOnly = True TabOrder = 0 end object ExitButton: TButton Left = 280 Top = 440 Width = 97 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 Program' TabOrder = 1 OnClick = ExitButtonClick end object ISAPanel: TGroupBox Left = 8 Top = 419 Width = 145 Height = 57 Hint = 'Set the Base Address of the ISA board you want to use this sampl' + 'e with, in Hexadecimal.' Caption = 'Base Address for ISA Card' TabOrder = 2 object HexLabel: TLabel Left = 14 Top = 28 Width = 19 Height = 13 Caption = 'Hex' end object BaseEdit: TEdit Left = 40 Top = 20 Width = 81 Height = 21 TabOrder = 0 Text = '300' end end object TestButton: TButton Left = 168 Top = 440 Width = 97 Height = 25 Caption = 'Start Test' TabOrder = 3 OnClick = TestButtonClick end object ChannelBox: TGroupBox Left = 9 Top = 140 Width = 369 Height = 277 TabOrder = 4 object ChannelLabel1: TLabel Left = 2 Top = 16 Width = 77 Height = 14 Alignment = taCenter Caption = ' Channel 0' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Courier New' Font.Style = [] ParentFont = False end object ChannelLabel2: TLabel Tag = 1 Left = 2 Top = 32 Width = 77 Height = 14 Alignment = taCenter Caption = ' Channel 1' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Courier New' Font.Style = [] ParentFont = False end object ChannelLabel3: TLabel Tag = 2 Left = 2 Top = 48 Width = 77 Height = 14 Alignment = taCenter Caption = ' Channel 2' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Courier New' Font.Style = [] ParentFont = False end object ChannelLabel4: TLabel Tag = 3 Left = 2 Top = 64 Width = 77 Height = 14 Alignment = taCenter Caption = ' Channel 3' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Courier New' Font.Style = [] ParentFont = False end object ChannelLabel5: TLabel Tag = 4 Left = 2 Top = 80 Width = 77 Height = 14 Alignment = taCenter Caption = ' Channel 4' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Courier New' Font.Style = [] ParentFont = False end object ChannelLabel6: TLabel Tag = 5 Left = 2 Top = 96 Width = 77 Height = 14 Alignment = taCenter Caption = ' Channel 5' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Courier New' Font.Style = [] ParentFont = False end object ChannelLabel7: TLabel Tag = 6 Left = 2 Top = 112 Width = 77 Height = 14 Alignment = taCenter Caption = ' Channel 6' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Courier New' Font.Style = [] ParentFont = False end object ChannelLabel8: TLabel Tag = 7 Left = 2 Top = 128 Width = 77 Height = 14 Alignment = taCenter Caption = ' Channel 7' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Courier New' Font.Style = [] ParentFont = False end object ChannelLabel9: TLabel Tag = 8 Left = 2 Top = 144 Width = 77 Height = 14 Alignment = taCenter Caption = ' Channel 8' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Courier New' Font.Style = [] ParentFont = False end object ChannelLabel10: TLabel Tag = 9 Left = 2 Top = 160 Width = 77 Height = 14 Alignment = taCenter Caption = ' Channel 9' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Courier New' Font.Style = [] ParentFont = False end object ChannelLabel11: TLabel Tag = 10 Left = 2 Top = 176 Width = 77 Height = 14 Alignment = taCenter Caption = ' Channel A' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Courier New' Font.Style = [] ParentFont = False end object ChannelLabel12: TLabel Tag = 11 Left = 2 Top = 192 Width = 77 Height = 14 Alignment = taCenter Caption = ' Channel B' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Courier New' Font.Style = [] ParentFont = False end object ChannelLabel13: TLabel Tag = 12 Left = 2 Top = 208 Width = 77 Height = 14 Alignment = taCenter Caption = ' Channel C' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Courier New' Font.Style = [] ParentFont = False end object ChannelLabel14: TLabel Tag = 13 Left = 2 Top = 224 Width = 77 Height = 14 Alignment = taCenter Caption = ' Channel D' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Courier New' Font.Style = [] ParentFont = False end object ChannelLabel15: TLabel Tag = 14 Left = 2 Top = 240 Width = 77 Height = 14 Alignment = taCenter Caption = ' Channel E' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Courier New' Font.Style = [] ParentFont = False end object ChannelLabel16: TLabel Tag = 15 Left = 2 Top = 256 Width = 77 Height = 14 Alignment = taCenter Caption = ' Channel F' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Courier New' Font.Style = [] ParentFont = False end end object ErrorStatus: TStatusBar Left = 0 Top = 480 Width = 385 Height = 19 Panels = <> SimplePanel = True end object TestTimer: TTimer Enabled = False Interval = 100 OnTimer = TestTimerTimer Left = 168 Top = 112 end end