Hallo, ich bins mal wieder ;D

ich habe mir eine Waage mit USB Schnittstelle gekauft und darauf gehofft das Gewicht mittels eigenem Programm auszulesen. Tja falsch gedacht. Es gibt sogar ein fertiges Tool welches Open Source ist und sogar mit Delphi realisiert worden ist, allerdings läuft das ganze über eine Jedi Komponente die ich nicht installiert bekomme ohne 100000 Fehler beim Kompilieren.

Schaut euch das ganze mal an, vielleicht kommt ihr darauf wie ich es doch realisieren kann.

LINK

Zitat von jacky213:

allerdings läuft das ganze über eine Jedi Komponente die ich nicht installiert bekomme ohne 100000 Fehler beim Kompilieren.

Hast du die JEDIs denn hier ausgecheckt?
https://github.com/project-jedi/jcl
https://github.com/project-jedi/jvcl
Der Installer sollte dann die JCL und JVCL (in der Reihenfolge ausführen) einfach installieren können.

Wie muss ich da genau vorgehen?

Die beiden Repositories z.B. mit Hilfe von TortoiseGit auschecken und dann darin jeweils jcl\install.bat und dann jvcl\install.bat ausführen und den Anweisungen folgen.

Läuft, vielen Dank

Hab soweit alles am laufen, sobald ich allerdings mein fertiges Programm auf den Zielrechner bringe, wird ein Fehler beim starten der Anwendung angezeigt "Device cannot be identified"

Während meiner Recherche bin ich auf einen Beitrag auf GitHub gestoßen LINK

Im verlauf der Diskussion kommt der Autor darauf das es an der Verwendung der JvHidControllerClass liegt.

zusammenfalten · markieren

Delphi-Quellcode:

@Steadyspike thanks a lot! It was a bug in the JVCL library (JvHidControllerClass) for Delphi...

in the constructor

constructor TJvHidDeviceController.Create(AOwner: TComponent; AOnHidCtlDeviceCreateError: JvHidDeviceCreateError; AOnDeviceChange: TNotifyEvent);

the two lines

SetOnDeviceChange(AOnDeviceChange);
FOnDeviceCreateError := AOnHidCtlDeviceCreateError;

are in the wrong order.
FOnDeviceCreateError must be set first.
I worked around by calling the constructor in two steps:

FHidCntrl := TJvHidDeviceController.Create(Self, DoOnDeviceCreateError, Nill);
FHidCntrl.OnDeviceChange := DoOnDeviceChange;

Den entsprechenden Eintrag im Constructor habe ich gefunden und die werte wie beschrieben miteinander getauscht, allerdings weist er am ende des Beitrags auch daraufhin, dass er besagten Constructor in zwei schritten aufruft.

Wie ist das gemeint und wie kann ich dies Bewerkstelligen.