Ich hab's in D4 probiert ;c)
Und extra für dich hab' ich's jetzt auch nochmal in D7Personal probiert und es funktioniert auch. Ich muss dazu sagen, dass ich nicht die
Jedi-Header habe, sondern lediglich deine Deklaration inkludiert und wie folgt abgeändert habe:
Delphi-Quellcode:
function NetShareEnum(servername: LPTSTR; level: DWORD; var butptr: Pointer;
prefmaxlen: DWORD; var entriesread: DWORD; var totalentries: DWORD;
resume_handle: PDWORD): Integer; stdcall; external 'netapi32.dll';
Ich habe also den Rückgabewert (der ja egal ist) geändert, weil der andere Typ nicht bekannt ist, und die external-Deklaration hinzugefügt. An der Parametern habe ich nichts gedreht. Und dann habe ich einfach einen untypisierten Pointer übergeben.
So, und jetzt habe ich mal probiert, einen Zeiger auf was anderes zu übergeben, und da bekomme ich denselben Fehler wie du. Also caste ich den Zeiger in einen Pointer, und siehe da, es funktioniert ;c)
Probier' also mal
zu übergeben.