object Form1: TForm1 Left = 320 Top = 103 Width = 817 Height = 546 Caption = 'USB-CTR-15' 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 Label1: TLabel Left = 80 Top = 16 Width = 52 Height = 20 Caption = 'Block 0' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label2: TLabel Left = 16 Top = 48 Width = 46 Height = 13 Caption = 'Counter 0' end object Label3: TLabel Left = 80 Top = 48 Width = 46 Height = 13 Caption = 'Counter 1' end object Label4: TLabel Left = 144 Top = 48 Width = 46 Height = 13 Caption = 'Counter 2' end object Label5: TLabel Left = 80 Top = 112 Width = 52 Height = 20 Caption = 'Block 3' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label7: TLabel Left = 16 Top = 144 Width = 46 Height = 13 Caption = 'Counter 0' end object Label8: TLabel Left = 80 Top = 144 Width = 46 Height = 13 Caption = 'Counter 1' end object Label9: TLabel Left = 144 Top = 144 Width = 46 Height = 13 Caption = 'Counter 2' end object Label10: TLabel Left = 280 Top = 16 Width = 52 Height = 20 Caption = 'Block 1' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label11: TLabel Left = 216 Top = 48 Width = 46 Height = 13 Caption = 'Counter 0' end object Label12: TLabel Left = 280 Top = 48 Width = 46 Height = 13 Caption = 'Counter 1' end object Label13: TLabel Left = 344 Top = 48 Width = 46 Height = 13 Caption = 'Counter 2' end object Label14: TLabel Left = 280 Top = 112 Width = 52 Height = 20 Caption = 'Block 4' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label15: TLabel Left = 216 Top = 144 Width = 46 Height = 13 Caption = 'Counter 0' end object Label16: TLabel Left = 280 Top = 144 Width = 46 Height = 13 Caption = 'Counter 1' end object Label17: TLabel Left = 344 Top = 144 Width = 46 Height = 13 Caption = 'Counter 2' end object Label18: TLabel Left = 472 Top = 16 Width = 52 Height = 20 Caption = 'Block 2' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label19: TLabel Left = 408 Top = 48 Width = 46 Height = 13 Caption = 'Counter 0' end object Label20: TLabel Left = 472 Top = 48 Width = 46 Height = 13 Caption = 'Counter 1' end object Label21: TLabel Left = 536 Top = 48 Width = 46 Height = 13 Caption = 'Counter 2' end object Label23: TLabel Left = 504 Top = 144 Width = 201 Height = 65 Alignment = taCenter AutoSize = False Caption = 'WARNING: This will load all counters, and may cause outputs to c' + 'hange. Make sure you have nothing dangerous connected.' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Layout = tlCenter WordWrap = True end object counterPanel0: TPanel Left = 16 Top = 64 Width = 49 Height = 17 Caption = '0000' TabOrder = 0 end object counterPanel1: TPanel Left = 80 Top = 64 Width = 49 Height = 17 Caption = '0000' TabOrder = 1 end object counterPanel2: TPanel Left = 144 Top = 64 Width = 49 Height = 17 Caption = '0000' TabOrder = 2 end object counterPanel3: TPanel Left = 216 Top = 64 Width = 49 Height = 17 Caption = '0000' TabOrder = 3 end object counterPanel4: TPanel Left = 280 Top = 64 Width = 49 Height = 17 Caption = '0000' TabOrder = 4 end object counterPanel5: TPanel Left = 344 Top = 64 Width = 49 Height = 17 Caption = '0000' TabOrder = 5 end object counterPanel6: TPanel Left = 408 Top = 64 Width = 49 Height = 17 Caption = '0000' TabOrder = 6 end object counterPanel7: TPanel Left = 472 Top = 64 Width = 49 Height = 17 Caption = '0000' TabOrder = 7 end object counterPanel8: TPanel Left = 536 Top = 64 Width = 49 Height = 17 Caption = '0000' TabOrder = 8 end object counterPanel9: TPanel Left = 16 Top = 160 Width = 49 Height = 17 Caption = '0000' TabOrder = 9 end object counterPanel10: TPanel Left = 80 Top = 160 Width = 49 Height = 17 Caption = '0000' TabOrder = 10 end object counterPanel11: TPanel Left = 144 Top = 160 Width = 49 Height = 17 Caption = '0000' TabOrder = 11 end object counterPanel12: TPanel Left = 216 Top = 160 Width = 49 Height = 17 Caption = '0000' TabOrder = 12 end object counterPanel13: TPanel Left = 280 Top = 160 Width = 49 Height = 17 Caption = '0000' TabOrder = 13 end object counterPanel14: TPanel Left = 344 Top = 160 Width = 49 Height = 17 Caption = '0000' TabOrder = 14 end object GroupBox1: TGroupBox Left = 8 Top = 216 Width = 793 Height = 289 Caption = '8254 emulation' TabOrder = 15 object Label6: TLabel Left = 8 Top = 48 Width = 65 Height = 17 AutoSize = False Caption = 'Counters' end object FreqOutButtonA: TSpeedButton Left = 664 Top = 72 Width = 129 Height = 25 AllowAllUp = True GroupIndex = 6 Caption = 'Output 0.25Hz' OnClick = FreqOutButtonAClick end object FreqOutButtonB: TSpeedButton Tag = 1 Left = 664 Top = 104 Width = 129 Height = 25 AllowAllUp = True GroupIndex = 7 Caption = 'Output 0.25Hz' OnClick = FreqOutButtonAClick end object FreqOutButtonC: TSpeedButton Tag = 2 Left = 664 Top = 136 Width = 129 Height = 25 AllowAllUp = True GroupIndex = 8 Caption = 'Output 0.25Hz' OnClick = FreqOutButtonAClick end object FreqOutButtonD: TSpeedButton Tag = 3 Left = 664 Top = 176 Width = 129 Height = 25 AllowAllUp = True GroupIndex = 9 Caption = 'Output 0.25Hz' OnClick = FreqOutButtonAClick end object FreqOutButtonE: TSpeedButton Tag = 4 Left = 664 Top = 216 Width = 129 Height = 25 AllowAllUp = True GroupIndex = 10 Caption = 'Output 0.25Hz' OnClick = FreqOutButtonAClick end object Label22: TLabel Left = 168 Top = 24 Width = 387 Height = 13 Caption = 'This part of the sample requires the default counter scheme head' + 'er to be attached' end object FreqOutTrackA: TTrackBar Left = 8 Top = 72 Width = 657 Height = 25 Max = 65533 Min = 61440 Orientation = trHorizontal PageSize = 256 Frequency = 256 Position = 62071 SelEnd = 0 SelStart = 0 TabOrder = 0 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = FreqOutTrackAChange end object FreqOutTrackB: TTrackBar Tag = 1 Left = 8 Top = 104 Width = 657 Height = 25 Max = 65533 Min = 61440 Orientation = trHorizontal PageSize = 256 Frequency = 256 Position = 62071 SelEnd = 0 SelStart = 0 TabOrder = 1 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = FreqOutTrackAChange end object FreqOutTrackC: TTrackBar Tag = 2 Left = 8 Top = 136 Width = 657 Height = 25 Max = 65533 Min = 61440 Orientation = trHorizontal PageSize = 256 Frequency = 256 Position = 62071 SelEnd = 0 SelStart = 0 TabOrder = 2 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = FreqOutTrackAChange end object FreqOutTrackD: TTrackBar Tag = 3 Left = 8 Top = 176 Width = 657 Height = 25 Max = 65533 Min = 61440 Orientation = trHorizontal PageSize = 256 Frequency = 256 Position = 62071 SelEnd = 0 SelStart = 0 TabOrder = 3 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = FreqOutTrackAChange end object FreqOutTrackE: TTrackBar Tag = 4 Left = 8 Top = 216 Width = 657 Height = 25 Max = 65533 Min = 61440 Orientation = trHorizontal PageSize = 256 Frequency = 256 Position = 62071 SelEnd = 0 SelStart = 0 TabOrder = 4 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = FreqOutTrackAChange end end object Button1: TButton Left = 504 Top = 104 Width = 201 Height = 41 Caption = 'Click here to start sample.' Default = True Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 16 OnClick = Button1Click end object readTimer: TTimer Enabled = False Interval = 200 OnTimer = readTimerTimer Left = 736 Top = 8 end end