Have you same sample about? in Delphi?
I'm try the code without success
procedure THidViewMainForm.HidCtlDeviceData(HidDev: TJvHidDevice;
ReportID: Byte; const Data: Pointer; Size: Word);
Var
i : Integer;
Str,teste,teste2,teste3: String;
Begin
For I := 1 To Size - 1 Do
Str := Str + Char( Cardinal( PChar( Data )[ I ] ) );
teste:=ConvStr(Data,8);
teste2:=ByteToHex(ReportID);
Memo1.Lines.Add( 'RECIBIDO : ' + Str +''+ teste+''+teste2);
beep;
CopyMemory(@ReceivedData, Data, Size);
teste3:=bintostr(ReceivedData);
Memo1.Lines.Add('Got Data!');
End;
I'm really lost...