Schönen guten Abend!
Ich hab bei der Konvertierung eines C++-Header ein Problem. Vielleicht ist hier jemand, der mir da weiterhelfen kann?
Der (gekürzte) C++-Header sieht so aus:
Code:
typedef struct _MONITOR
{
BOOL (
WINAPI *pfnEnumPorts)
(
LPWSTR pName,
DWORD Level,
LPBYTE pPorts,
DWORD cbBuf,
LPDWORD pcbNeeded,
LPDWORD pcReturned
);
BOOL (
WINAPI *pfnOpenPort)
(
LPWSTR pName,
PHANDLE pHandle
);
BOOL (
WINAPI *pfnOpenPortEx)
(
LPWSTR pPortName,
LPWSTR pPrinterName,
PHANDLE pHandle,
struct _MONITOR FAR *pMonitor
);
} MONITOR, FAR *LPMONITOR;
In Delphi hab ich den ersten Teil so umgesetzt:
Delphi-Quellcode:
type
rMonitor=packed record
pfnEnumPorts: function (pName:PWideChar;dwLevel:DWORD;pPorts:PByte;
cbBuf:DWORD;var pdwNeeded,pdwReturned:DWORD):LongBool;stdcall;
pfnOpenPort: function (pName:PWideChar;pH:PHandle):LongBool;stdcall;
pfnOpenPortEx: function (pName,pPrinterName:PWideChar;pH:PHandle;
_Monitor:rMonitor):LongBool;stdcall;
end;
Und in pfnOpenPortEx liegt das Problem: Soweit ich den C-Code verstanden habe, ist der 4. Parameter der Funktion pfnOpenPortEx eine Struktur von genau dem Typ den wir aber gerade definieren.
Kann mir jemand weiterhelfen, wie man das korrekt umsetzt?
Gruß
Luggi