Probleme mit Datentypen bei einer DLL

[mcinternet]

Moin,

ich habe eine DLL die mir laut Buch eine Adresse auf einen Null-Termierten String zurückgibt
( returns the address of a null-terminated character string ). Habe da bereits alle möglichen Datentypen ausprobiert und komme auf keinen grünen Zweig. Vielleicht hat hier jemand einen Tip?

Die dll ist aus dem Jahre 2004 und wird seitdem nicht mehr verändert -

ich arbeite hier mit Delphi XE unter Windows 7.

der Aufruf ist:

function xyzErrMsg ( errorCode : Word
) : String; stdcall; external xyzdll name 'ErrMsg';

Der Datentyp String passt hier leider nicht

Gruss

McInternet

[p80286]

Hast Du es mal mit PAnsiChar versucht ?

Gruß
K-H

[mcinternet]

Zitat von p80286:

Hast Du es mal mit PAnsiChar versucht ?

Gruß
K-H

aufruf dann:

var Meldung : PAnsichar;

Meldung := yxzErrMsg(errornummer);

Gruss
McInternet

[mcinternet]

ne - kommt nur Blödsinn


Gruss

McInternet

[NickelM]

Nein, ich glaube du hast ihn falsch verstanden, du musst sozusagen, wie du die Funktion importierst ändern.

Delphi-Quellcode:

function xyzErrMsg ( errorCode : Word
) : String; stdcall; external xyzdll name 'ErrMsg';

zu:

Delphi-Quellcode:

function xyzErrMsg ( errorCode : Word
) : PAnsiChar; stdcall; external xyzdll name 'ErrMsg'; //Man verwendet ungern Strings, also den DatenTyp String von Delphi. PAnsiChar ist nur eine Adresse auf den Anfang eines Textes im Speicher.
Und um im Speicher zu wissen, wann er aufhört, setzt man ein 0 Byte (#0 in Char) am Ende.
D.h. wenn du auf den Datentyp PAnsiChar zugreifst, wird alles gelesen bis zum 0 Byte.

Gruß NickelM

[mcinternet]

Zitat von NickelM:

Nein, ich glaube du hast ihn falsch verstanden, du musst sozusagen, wie du die Funktion importierst ändern.

Delphi-Quellcode:

function xyzErrMsg ( errorCode : Word
) : String; stdcall; external xyzdll name 'ErrMsg';

zu:

Delphi-Quellcode:

function xyzErrMsg ( errorCode : Word
) : PAnsiChar; stdcall; external xyzdll name 'ErrMsg'; //Man verwendet ungern Strings, also den DatenTyp String von Delphi. PAnsiChar ist nur eine Adresse auf den Anfang eines Textes im Speicher.
Und um im Speicher zu wissen, wann er aufhört, setzt man ein 0 Byte (#0 in Char) am Ende.
D.h. wenn du auf den Datentyp PAnsiChar zugreifst, wird alles gelesen bis zum 0 Byte.

Gruß NickelM

das hab ich schon so nach PAnsiChar geändert.

Ich rufe dann diese Funktion so auf:

var Meldung : PAnsiChar;
Fehlernummer : Word;
Begin
Meldung := xyzErrMsg(Fehlernummer);
...
...
end;

nur leider steht da nur Blödsinn drin ( wenn ich schon mit dem Debugger reinschaue)
=> $495ABA{"} ....
und drin stehen muß z.B. => success etc.

Achso: Das Gleiche compiliert unter Delphi 2007 - einwandfrei!

Gruß
McInternet

[DeddyH]

Der Funktionskopf ist schon ungewöhnlich für eine Funktion in einer DLL. Normalerweise übergibt man einen Speicherbereich, den man selbst reserviert hat, welcher dann durch die Funktion befüllt wird. Ist die DLL in Delphi geschrieben? Falls in C/C++, hast Du da Header-Dateien dafür? Wie sähe dann da der Originalaufruf aus?