Delphi-Programm mit C++ Dll Aufruf und komischem Verhalten

[Patrick]

Hallo,

Ich habe eine C++ Dll bekommen, die ich aus einem Testprogramm aufrufe. Die Funktion bekommt ein Bild von mir und gibt ein Array von RGB-Farbwerten zurück. Wobei das Array dann immer eine Länge von n*3 Feldern hat. Die Anwendung ist unter Delphi 2010 kompiliert und die DLL mit Visual Studio. Ausserdem verwendet die DLL OpenCV-Funktionen, die aber in weiteren Dlls beiliegen.

Der Funktionskopf der DLL-Funktion schaut so aus:

Code:

int Auswertung (HBITMAP Picture, int* Result);

Mein Delphi Programm mit Verarbeitung so:

Delphi-Quellcode:

  arrp = ^integer;//^arr;

...

  function Auswertung(Picture : HBITMAP; var Result : arrp): integer; stdcall;

implementation

{$R *.dfm}

function Auswertung(Picture : HBITMAP; var Result : arrp): integer; stdcall;
external 'ABC.dll';

procedure TForm11.Button1Click(Sender: TObject);
var
  Bitmap : TBitmap;
  erg : arrp;
  len, i : integer;
begin
  if OpenDialog.Execute then
  begin
    Label1.Caption := 'len: ';
    ListBox1.Clear;
    Bitmap := TBitmap.Create;
    Bitmap.LoadFromFile(OpenDialog.FileName);
    erg := nil;
    len := Auswertung(Bitmap.Handle, erg);
    Label1.Caption := 'len: '+InttoStr(len);
    Application.ProcessMessages;
    for i := 0 to len*3 -1 do
    begin
      ListBox1.Items.Add(InttoStr(erg^));
      inc(erg, 1);
    end;
//    FreeMem(Pointer(bak), len*3);
    Bitmap.Free;
  end;
end;

end.

Nun zu meinen Fragen:
Wenn ich mein Programm über die Delphi IDE starte funktioniert alles wunderbar. Starte ich mein Programm jedoch außerhalb der IDE gibt es zwei Möglichkeiten (Abhängig von der DLL-Version): Entweder die Anwendung verabschiedet sich sofort, oder Es funktioniert einmal, und beim zweiten Aufruf der Funktion gibt es einen Speicherfehler.

Und wie gebe ich eigentlich den Speicher des Arrays wieder ordnungsgemäß frei?