DLL Zugriffsverletzung

[mymuschy]

Hallo zussammen,

ich habe mir eine einfache dll(C++) geschnappt und versuche wie folgt die Fct. ShowInfoBox zu nutzen:


hier die FCT in der Headerdatei der DLL:

Code:

DLLEXPORT int TOOLSUITEAPI ShowInfoBox(LPCSTR psText);

hier meine Deklaration in Delphi:

Delphi-Quellcode:

unit Unit_DLL;

interface
function ShowInfoBox(Var Text:PChar):integer; stdcall;

implementation
function ShowInfoBox(Var Text:PChar):integer;
  external 'TestDll.DLL'index 1;

und hier der Aufruf:

Delphi-Quellcode:

VAR        buf: char;
     pbuf: pchar ;
begin
      buf := '0';         // Einen Wert  zuweisen
      Pbuf := @buf;         // Adresse  zuweisen

      ShowInfoBox(Pbuf);

ich bekomme beim aufruf von ShowInfoBox immer die Fehlermeldung: "Zugriffsverletzung bei..."


Ich habe auch schon versucht den aufruf ohne Zeiger versucht: ShowInfoBox(buf);
Aber leider mit der selben Fehlermeldung.

was mache ich falsch?