DLL (c++) in Delphi nutzen

[nils.addi]

Hallo zusammen!

Ich stehe vor einem kleinen Problem. Ich habe eine DLL, in der lt. Header-Datei folgende Function beschrieben wird:
THIRDDLL bool ThirdOpenRS232Mode(unsigned char ComPort, unsigned int Speed, unsigned char DataMode, int* Obj); Meine Implementierung in Delphi sieht folgendermaßen aus:

Delphi-Quellcode:

function  ThirdOpenRS232Mode (ComPort: byte; Speed: word;  DataMode: byte;
                                       Obj : Pointer): boolean; stdcall; external '3rd_DLL2.dll';

Aufgerufen wird die Funktion folgedermaßen:

Delphi-Quellcode:

var obj : integer;

procedure TForm1.Button1Click(Sender: TObject);
var freeports : integer;
begin
  try
     ThirdOpenRS232Mode(1,9600,0,@obj);
  except
  end;
end;

Leider gibt es eine Schutzverletzung. Ich denke, die Deklarationi ist richtig! Kann mir jemand eine Lösung bzw. einen Lösungsansatz anbieten?

Gruß

Nils