Forum: Win32/Win64 API (native code)
Delphi
by Wal,
4. Aug 2008
So die Delphi-Compo ist soweit einsatzbereit, es laufen alle Pin und Port Befehle.
Der Rest ist auch kein Hexenwerk mehr.
Wal
Forum: Win32/Win64 API (native code)
Delphi
by Wal,
2. Aug 2008
Eine verbesserte Version, der demo.c im Ordner Demos nachempfunden.
Wal
Forum: Win32/Win64 API (native code)
Delphi
by Wal,
2. Aug 2008
Habe hier ein simples Programm geschrieben um eine Led anzusteuern.
Werde mal versuchen eine Compo daraus zu machen. Hauptsache man sieht mal was.
Nehme direkt die LibUSB und ohne die Octopus.dll.
Wal
Neue Version unten.
Forum: Win32/Win64 API (native code)
Delphi
by Wal,
30. Jul 2008
Habe heute das OctopusCan bekommen, bei mir funzt das Ganze ohne Fehlermeldung mit dem Code von Omata.
Er übergibt mir bei Init und Open jeweils 1.
Wal
Forum: Win32/Win64 API (native code)
Delphi
by Wal,
25. Jul 2008
Und das ist ja was ich gemeint habe, im Delphi-Header für usb_dev_handle steht:
pusb_dev_handle = pointer; // struct usb_dev_handle;
// typedef struct usb_dev_handle usb_dev_handle;
Wal
Forum: Win32/Win64 API (native code)
Delphi
by Wal,
25. Jul 2008
Du hast mich falsch verstanden, du sollst den Header nicht einbinden. Sondern die Dateien vergleichen um die Variabeln-Typen herauszubekommen.
Meiner Meinung müßte das so gehen:
type
octopus_context = packed record
usb_handle : pointer;
error_str : pchar;
Forum: Win32/Win64 API (native code)
Delphi
by Wal,
25. Jul 2008
Da ich mir auch so ein Teil bestellt habe, verfolge ich das hier auch gespannt. Dein Fehler hat nicht's mehr mit der Octopus.dll zu tun sondern mit der libusb.dll. Habe mir mal den Delphi-Wrapper für die libusb.dll angeschaut und festgestellt,das der usb_handle kein integer ist, sondern ein Pointer. siehe Antwort von Omata. usb_device = packed record
next,
prev: pusb_device;
...