HID Komponente - Komme nicht zurecht

[Robert Marquardt]

Zitat von Michael94:

Was ich von dir noch bräuchte wäre ein "Werte an HID senden" damit ich die LED ändern kann.
Ansonsten werde ich dann alleine zurrecht kommen.

Das sollte brav funktionieren wenn du den Report direkt initialisierst.

Delphi-Quellcode:

      FillChar(Report, SizeOf(Report), 0);
      // das ist ziemlich aufwaendig dafuer das wir nur eine Usage im Report setzen wollen
      Report.ReportID := 0;
      // wir wollen in einen Output-Report schreiben
      Device.ReportTypeParam := HidP_Output;
      // das benennt die spezifische Usage die gesetzt werden soll
      Device.UsagePageParam := HID_USAGE_PAGE_CONSUMER;
      Device.LinkCollectionParam := $01; // CollectionType=Application
      Device.UsageParam := HID_USAGE_CONSUMER_CONSUMER_CONTROL;
      // den Wert setzen (LED Maximum)
      Device.SetUsageValue($FF, Report, Device.Caps.OutputReportByteLength);
      // ab damit ans Geraet
      Device.WriteFile(Report, Device.Caps.OutputReportByteLength, Written);

ersetzen durch

Delphi-Quellcode:

      FillChar(Report, SizeOf(Report), 0);
      // wird eh vom FillChar erledigt
      // Report.ReportID := 0;
      // den Wert setzen (LED Maximum)
      Report.Data[0] := $FF;
      // ab damit ans Geraet
      Device.WriteFile(Report, Device.Caps.OutputReportByteLength, Written);

Da jetzt eine Methode draus zu schnitzen sollte doch kein Problem sein.