Header von c++ nach delphi

[tester6]

hallo,
ich muss ein usb-messgerät auslesen und sitze hier schon eine weile an dem header und komme nicht recht weiter.
vielleicht wäre einer so nett mir zu helfen.

C++

Delphi-Quellcode:

struct product_info
{
  uint32t serial
  uint32t fw_version
  char model[32]
  uint8_t res[256]
}
int32_t
get_product_info (int32_t driver_handle, int id, struct product_info *info, int32_t size);

habe ich folgendermasen umgesetzt

Delphi

Delphi-Quellcode:

type 
  prod_info = record
    serial :cardinal
    version:cardinal
    model  :array[0..31] as char
    res    :array [0..255] as Byte
  end;

Function get_product_info (driver_handle:THandle; id:integer; const size:cardinal):prod_info; cdcel; external'test.dll'

aufruf
var
  handle:thandle;
  z:prod_info;
  :
begin
  handle:=open('Testgeraet');  // liefert den handle, ist ok
  z:=get_prod_info(handle,0,size of (prod_info));  // 0=ist das gerät am bus

ich bekomme so keine verwertbaren ergebnisse

besten dank