C Funktion aus DLL in Delphi nutzen

[zeras]

Hallo,

ich möchte eine C DLL ansprechen und der C Kontrukt sieht so aus:

extern "C" BOOL WINAPI GetAV(
const char *name,
long* address
);

Umgeschrieben habe ich das so:

Delphi-Quellcode:

arDataTcp = array[0..255] of char;

function GetAV(
           const name  : arDataTcp;
           address     : LongWord
         ): LongBool stdcall;

Aufruf dann

Delphi-Quellcode:

var
  s : arDataTcp;
  Adr : LongWord;

begin
  StrPCopy(s,'ISS');
  if LslGetAdressVar(&s, &Adr) then begin
  end

Ich bekomme dann immer Zugriffsverletzung bei Lesen von Adresse xxxxx.
Was mache ich falsch?

[turboPASCAL]

Code:

extern "C" BOOL WINAPI GetAV(
const char *name,
long* address
);

Lässt sich eher so übersetzen:

Delphi-Quellcode:

function GetAV(Name: PChar; Address: Pointer): bool; stdcall;

bzw.:

Delphi-Quellcode:

function GetAV(Name: PChar; Address: pLongint): bool; stdcall;

[zeras]

Zitat:

Zitat von turboPASCAL (Beitrag 1077287)

Code:

extern "C" BOOL WINAPI GetAV(
const char *name,
long* address
);

Lässt sich eher so übersetzen:

Delphi-Quellcode:

function GetAV(Name: PChar; Address: Pointer): bool; stdcall;

bzw.:

Delphi-Quellcode:

function GetAV(Name: PChar; Address: pLongint): bool; stdcall;

Danke: Scheint zu gehen. Nun muss ich nur noch die richtigen Adressen haben und kann weiter testen.