object MainForm: TMainForm Left = 585 Top = 412 BorderStyle = bsDialog Caption = 'MainForm' ClientHeight = 244 ClientWidth = 408 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False OnActivate = FormActivate OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Label5: TLabel Left = 7 Top = 8 Width = 323 Height = 29 Alignment = taCenter Caption = 'Windows 104-IDIO-16 Sample' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -24 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label2: TLabel Left = 48 Top = 80 Width = 121 Height = 13 Alignment = taCenter AutoSize = False Caption = 'Relay Output' end object Label4: TLabel Left = 248 Top = 80 Width = 121 Height = 13 Alignment = taCenter AutoSize = False Caption = 'Opto Input' end object IsaLabel: TLabel Left = 19 Top = 49 Width = 205 Height = 13 Caption = 'Base Address for 104-IDIO-16 card (in hex):' end object GroupBox1: TGroupBox Left = 8 Top = 120 Width = 393 Height = 81 Caption = 'Status' TabOrder = 0 object Memo1: TMemo Left = 9 Top = 14 Width = 377 Height = 62 Lines.Strings = ( 'This sample program will sequentially turn on all bits of the re' + 'lay input and' 'sequentially turn them off. Each time it sets a new bit, both th' + 'e relay output' 'and the relay input are read and the data is displayed. This dem' + 'onstrates' 'how to write to the relays and how to use the readback function ' 'of the board.' '') ReadOnly = True ScrollBars = ssVertical TabOrder = 0 end end object ExitButton: TBitBtn Left = 263 Top = 208 Width = 138 Height = 25 Caption = 'EXIT PROGRAM' TabOrder = 1 OnClick = ExitButtonClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 0400000000000001000000000000000000001000000010000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333FFFFF3333333333999993333333333F77777FFF333333999999999 3333333777333777FF3333993333339993333377FF3333377FF3399993333339 993337777FF3333377F3393999333333993337F777FF333337FF993399933333 399377F3777FF333377F993339993333399377F33777FF33377F993333999333 399377F333777FF3377F993333399933399377F3333777FF377F993333339993 399377FF3333777FF7733993333339993933373FF3333777F7F3399933333399 99333773FF3333777733339993333339933333773FFFFFF77333333999999999 3333333777333777333333333999993333333333377777333333} NumGlyphs = 2 end object BeginSample: TButton Left = 10 Top = 208 Width = 89 Height = 25 Caption = 'Perform I/O' TabOrder = 2 OnClick = BeginSampleClick end object RelayOut: TPanel Left = 17 Top = 96 Width = 176 Height = 21 BevelOuter = bvLowered Caption = '0000000000000000' TabOrder = 3 end object OptoIn: TPanel Left = 216 Top = 96 Width = 176 Height = 21 BevelOuter = bvLowered Caption = '0000000000000000' TabOrder = 4 end object IsaEdit: TEdit Left = 233 Top = 46 Width = 37 Height = 21 TabOrder = 5 Text = '300' end object RunTimer: TTimer Enabled = False OnTimer = RunTimerTimer Left = 368 Top = 8 end end