Keskustelu: Ohjelmointikysymykset: Pascal: pascal: usb

Tätä yritin, mut kun ei toimi niin ei toimi 'Access violation at address 00000000'....:

procedure UsbOpen;
const
//     class_Garmin: TGUID ='{2C9C45C2-8E7D-4C08-A12D-816BBAE722C0}';
     class_Garmin: TGUID ='{2c9c45c2-8e7d-4c08-a12d-816bbae722c0}';
var
  StorageGUID: TGUID;
  theDevInfo: HDEVINFO;

begin
    StorageGUID := class_Garmin;
    try
    theDevInfo := SetupDiGetClassDevs(@StorageGUID, nil, 0,
        DIGCF_PRESENT or DIGCF_DEVICEINTERFACE);
    except
        raise;
    end;

Villi arvaus: Yritätä ohjata USB Garmin GPS;ssää Pascalilla.
Enempää tietämättä se saattaisi onnistua, kun ajaa ensin Garminin ajurit, ja muuttaa Garminin simuloimaan Comia (RS, Bluetooth, IR) ja NEMEA 183 (Ei ehkä oikea numerosarja).

Jonka jälkeen tietokoneelle saat datat hakemalla RS:n tai Comin ohjaukseen soveltuvia luokkia/OCX:iä, joiden avulla saat siis dataa simuloiduista com-porteista.

Joo, oikea arvaus, mutta kun ajurit on jo haettu ja ohjelmakin on olemassa (koodattu com-portin käsittelyyn ja toimii garminin protokollalla) mutta usb puuttuu...
Setupapi.h:ta vastaava palikka haettu.
Kokeilin class_garminia muuttaa muttei sekään....

Öh, minulta myös loppuu taidot ja tiedot, jollei USB-garminta saa emuloimaan Com-porttia.
Googlettamalla totesin, etten osaa auttaa, sillä näyttää siltä, ettei USBGarminia saa emuloimaan COMia.

Löysin garminin sivuilta c-mallin 'USBSDK.c' ja aloin soveltaa sitä delphi 4:lle. Samoilla draivereilla MapSource tunnistaa gepsin.