IOCTL von C nach Delphi portieren

[NetSonic]

Ich habe folgenden C Quelltext vorliegen, den ich nach Delphi portieren möchte um die digitalen IO-Ports eines Industrie-Mainboards anzusprechen.

Code:

#define WDT_DEVICE         "\\\\.\\WDT_DEVICE"
#define WDT_DEVICE_NAME         L"\\Device\\WDT_DEVICE"
#define WDT_DOS_DEVICE_NAME      L"\\DosDevices\\WDT_DEVICE"

// Device type
#define WDT_TYPE         35001

// The IOCTL function codes from 0x800 to 0xFFF are for customer use.
#define IOCTL_SYS_WDT_SET_TIMEOUT   CTL_CODE(WDT_TYPE, 0x800, METHOD_BUFFERED, FILE_WRITE_ACCESS)
#define IOCTL_SYS_WDT_START      CTL_CODE(WDT_TYPE, 0x801, METHOD_BUFFERED, FILE_WRITE_ACCESS)
#define IOCTL_SYS_WDT_STOP      CTL_CODE(WDT_TYPE, 0x802, METHOD_BUFFERED, FILE_WRITE_ACCESS)
#define IOCTL_SYS_WDT_RESTART      CTL_CODE(WDT_TYPE, 0x803, METHOD_BUFFERED, FILE_WRITE_ACCESS)
#define IOCTL_SYS_DIO_READ      CTL_CODE(WDT_TYPE, 0x804, METHOD_BUFFERED, FILE_WRITE_ACCESS)
#define IOCTL_SYS_DIO_WRITE      CTL_CODE(WDT_TYPE, 0x805, METHOD_BUFFERED, FILE_WRITE_ACCESS)

Wie muss die Umwandlung der IOCTL_SYS Funktionscodes aussehen? Diese müssen ja als CONST in Delphi definiert werden,
aber wir muss das aussehen? Vielleicht so...? Und wie rufe ich die dann auf?

Delphi-Quellcode:

CONST
  WDT_DEVICE = '\\.\WDT_DEVICE';
  WDT_TYPE = $35001;
  IOCTL_SYS_DIO_WRITE = $805;

Danke schonmal vorab, für eure Hilfe!