HIDKomponente使用读写Hid设备(转)

源:HIDKomponente使用读写Hid设备一瞥

HIDKomponente 是delphi中使用的第三方Hid控件库,可以检测、控制连接到电脑的Hid设备。一般情况下多为usb设备。 HIDKomponente的使用实际上很简单,只是因为第一次使用,遇到些问题。它的demo很丰富,很实用。 要使用HIDKomponente库,只需要安装HidController.dpk,并且在单元中添加引用JvHidControllerClass。 使用示例:     在窗体上放置一个TJvHidController。我们要用到的事件有:

        OnArrival
        OnDeviceChange
        OnDeviceData
        OnRemoval

    其它事件,这里就不使用了。当然,这是有前提的:就是你要确保你传输的数据的正确性,也就是不能出现无效数据。          在HIDKomponente库中TJvHidDevice表示一个Device,即一个hid设备。通过此对象你可以获得设备的详细信息。比如,     HidDev.Attributes.VendorID 表示设备的 VID,     HidDev.Attributes.ProductID 表示设备的 PID等等          所以在OnArrival事件中,可以指定我们需要的设备

    if (HidDev.Attributes.VendorID = USB_VID) and (HidDev.Attributes.ProductID = USB_PID) then
    begin
        AddLog(Format('设备已安装.【%s ; %s】', [HidDev.ProductName, HidDev.SerialNumber]));
    end;

        在OnDeviceChange事件中CheckOut设备。

    if HidDevs.CheckOutByID(FHidDev, USB_VID, USB_PID) then
    begin
        FHidDev.NumInputBuffers := SizeOf(TReport);
        FHidDev.NumOverlappedBuffers := SizeOf(TReport);
    end;

       什么是CheckOut?CheckOut有7个重载方法,可以查看JvHidControllerClass源码或帮助文件。此方法的功能是让你的应用程序控制设备。在CheckOut后,     TJvHidDevice(示例中的FHidDev)将开启读取线程TJvHidDeviceReadThread。TJvHidDeviceReadThread线程用来读取TJvHidDevice中的report。可以看出     TJvHidDevice是异步操作的。既然使用了异步方式读取数据,那么查看TJvHidDeviceReadThread的Execute方法,可以看过,如果读取到数据,那么会调用     DoData方法,而此方法调用Device的OnData属性事件。而OnData是被赋值为DataEvent(参看:procedure TJvHidDeviceController.SetDevData(const DataEvent: TJvHidDataEvent)),所以对于数据的接收(读取),我们直接使用OnDeviceData事件。          OnRemoval事件在hid设备被拔掉之后触发。这里我们要释放对设备的控件,CheckIn。

if (HidDev.Attributes.VendorID = USB_VID) and (HidDev.Attributes.ProductID = USB_PID) then
    begin
        if (Assigned(FHidDev)) and (not FHidDev.IsPluggedIn) then
        begin
            HidDevs.CheckIn(FHidDev);
        end;
        FHidDev := nil;
        DeviceEnabled;
        AddLog('设备已移除', ltError);
    end;

    基本上差不多了。再来说下写入数据。写入数据使用TJvHidDevice的WriteFile方法,当然,还有其它的方法。     WriteFile(var Report; ToWrite: DWORD; var BytesWritten: DWORD)     第一个参数为字节数组,一般设定为65字节。如:

        TReport = packed record
            ReportID: byte;
            Data: array[0..64] of byte;
        end;

        ReportId一般为0。     第二个参数ToWrite为需要写入的数据长度。一般使用Device.Caps.OutputReportByteLength     第三个参数BytesWritten为实际写入的字节数据。一般忽略此值。          写入之后就是读取,使用TJvHidDevice的ReadFile(或其它方法)读取与TJvHidController的OnDeviceData读取的区别是,OnDeviceData事件读取到的数据忽略第一个字节,即ReportID。     若同时使用ReadFile(或其它方法)与OnDeviceData,那么,首先是ReadFile然后是OnDeviceData。Readfile方法进行一次读取,而OnDeviceData会不断的将数据读取出来。如果     发送一个命令之后返回的Report太大(大于设定的 InputReportByteLength),那么最好是使用OnDeviceData事件读取数据。          注意事项:         在进行数据通迅时需要定义Report的大小,此大小由设备提供。定义之后在输入或输出数据时一定要使用此大小的数据包,不然,TJvHidController或TJvHidDevice在读取数据时就会出错,无法读取到有效数据。

  Hid设备数据检测工具 Bus Hound

 

posted @ 2015-06-15 15:55  酒醉的Tiger  阅读(1070)  评论(0编辑  收藏  举报