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!