hid controller（human interface devices）一套完整的hid相关组件
源代码在线查看： main.dfm
object MainForm: TMainForm
Left = 343
Top = 206
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = 'HIDtest'
ClientHeight = 433
ClientWidth = 470
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
OnDestroy = FormDestroy
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 8
Top = 8
Width = 82
Height = 13
Caption = 'USB HID device:'
end
object Label2: TLabel
Left = 320
Top = 40
Width = 20
Height = 13
Caption = 'Size'
end
object Label3: TLabel
Left = 160
Top = 40
Width = 20
Height = 13
Caption = 'Size'
end
object Bevel1: TBevel
Left = 312
Top = 24
Width = 153
Height = 89
end
object Label4: TLabel
Left = 320
Top = 8
Width = 101
Height = 13
Caption = 'Output Report status:'
end
object Label5: TLabel
Left = 424
Top = 40
Width = 25
Height = 13
Caption = 'bytes'
end
object Label6: TLabel
Left = 320
Top = 64
Width = 28
Height = 13
Caption = 'Count'
end
object Label7: TLabel
Left = 424
Top = 64
Width = 32
Height = 13
Caption = 'reports'
end
object Label8: TLabel
Left = 320
Top = 88
Width = 31
Height = 13
Caption = 'Speed'
end
object Label9: TLabel
Left = 424
Top = 88
Width = 35
Height = 13
Caption = 'bytes/s'
end
object Label10: TLabel
Left = 160
Top = 8
Width = 93
Height = 13
Caption = 'Input Report status:'
end
object Bevel2: TBevel
Left = 152
Top = 24
Width = 153
Height = 89
end
object Label11: TLabel
Left = 264
Top = 40
Width = 25
Height = 13
Caption = 'bytes'
end
object Label12: TLabel
Left = 160
Top = 64
Width = 28
Height = 13
Caption = 'Count'
end
object Label13: TLabel
Left = 264
Top = 64
Width = 32
Height = 13
Caption = 'reports'
end
object Label14: TLabel
Left = 160
Top = 88
Width = 31
Height = 13
Caption = 'Speed'
end
object Label15: TLabel
Left = 264
Top = 88
Width = 35
Height = 13
Caption = 'bytes/s'
end
object Label16: TLabel
Left = 8
Top = 120
Width = 102
Height = 13
Caption = 'Output Report config:'
end
object Bevel3: TBevel
Left = 144
Top = 8
Width = 9
Height = 177
Shape = bsLeftLine
end
object Bevel4: TBevel
Left = 0
Top = 136
Width = 137
Height = 41
end
object Label17: TLabel
Left = 8
Top = 152
Width = 35
Height = 13
Caption = 'Interval'
end
object Label18: TLabel
Left = 112
Top = 152
Width = 13
Height = 13
Caption = 'ms'
end
object LogRichEdit: TRichEdit
Left = 0
Top = 192
Width = 465
Height = 241
BiDiMode = bdRightToLeft
ParentBiDiMode = False
ReadOnly = True
ScrollBars = ssBoth
TabOrder = 7
WordWrap = False
end
object StartButton: TButton
Left = 304
Top = 128
Width = 49
Height = 25
Caption = 'Start'
TabOrder = 4
OnClick = StartButtonClick
end
object DevListBox: TListBox
Left = 0
Top = 24
Width = 137
Height = 89
ItemHeight = 13
TabOrder = 1
OnClick = DevListBoxClick
end
object OutRepSizeEdit: TEdit
Left = 360
Top = 32
Width = 57
Height = 21
TabStop = False
ReadOnly = True
TabOrder = 8
end
object InRepSizeEdit: TEdit
Left = 200
Top = 32
Width = 57
Height = 21
TabStop = False
ReadOnly = True
TabOrder = 11
end
object OutRepCountEdit: TEdit
Left = 360
Top = 56
Width = 57
Height = 21
TabStop = False
ReadOnly = True
TabOrder = 2
end
object OutRepSpeedEdit: TEdit
Left = 360
Top = 80
Width = 57
Height = 21
TabStop = False
ReadOnly = True
TabOrder = 0
end
object InRepCountEdit: TEdit
Left = 200
Top = 56
Width = 57
Height = 21
TabStop = False
ReadOnly = True
TabOrder = 10
end
object InRepSpeedEdit: TEdit
Left = 200
Top = 80
Width = 57
Height = 21
TabStop = False
ReadOnly = True
TabOrder = 9
end
object StopButton: TButton
Left = 360
Top = 128
Width = 49
Height = 25
Caption = 'Stop'
Enabled = False
TabOrder = 5
OnClick = StopButtonClick
end
object OutRepIntervalEdit: TEdit
Left = 64
Top = 144
Width = 41
Height = 21
MaxLength = 4
TabOrder = 3
Text = '100'
OnChange = OutRepIntervalEditChange
end
object ClearButton: TButton
Left = 416
Top = 128
Width = 49
Height = 25
Caption = 'Clear'
TabOrder = 6
OnClick = ClearButtonClick
end
object HidCtl: TJvHidDeviceController
OnEnumerate = HidCtlEnumerate
OnDeviceChange = HidCtlDeviceChange
Left = 376
Top = 160
end
object MeasureTimer: TTimer
Enabled = False
OnTimer = MeasureTimerTimer
Left = 408
Top = 160
end
object OutRepTimer: TTimer
Enabled = False
OnTimer = OutRepTimerTimer
Left = 440
Top = 160
end
end
