Moin Steppo,
Zitat von
Steppo:
So wie ich das sehe, habe ich die Funktion nicht richtig aus VB nach Delphi übertragen.
entschuldigung.
Ist ja nicht schlimm.
Am besten wäre es in so einem Falle nicht nach bestehenden VB Übersetzungen zu suchen, sondern direkt die C-Deklarationen für die Übersetzung zu verwenden.
Ich kenn' mich jetzt mit VB nicht so gut aus, aber meines Wissens muss man da für so manche Sache ein paar mehr Verrenkungen machen um einige
API Funktionen nutzen zu können.
Eine Übersetzung C >
PAS dürfte einfacher sein, als C > BAS >
PAS 
Falls Du kannst (sind so ca. 360MB Vollinstallation) kannst Du Dir sonst auch mal das
PSDK herunterladen, ggf. auch nur teilweise.
Dann hast Du auch gleich die C Header dabei und kannst Dir auch eventuell in Delphi noch nicht enthaltene Konstanten heraussuchen.