cdecl-Callback und TForm

[Gloegg_FHBI]

Hallo Leute,

Ich sitze grade an einem Programm, welches ein Messgerät (angeschlossen über USB) benutzen soll. Zur Steuerung des Messgerätes habe ich vom Hersteller eine DLL bekommen, diese exportiert 3 Funktionen:

Delphi-Quellcode:

PDWORD = ^DWORD;
PFloatArray = ^TFloatArray;
TFloatArray = array[0..31] of Single;

TDLL_ShowData = procedure (aData : PFloatArray); cdecl;

function InitNeXusDevice(aFunc : TDLL_ShowData) : DWORD; cdecl; external 'NeXusDLL.dll';
function StartNeXusDevice(aSampleRate : PDWORD) : DWORD; cdecl; external 'NeXusDLL.dll';
function StopNeXusDevice : DWORD; cdecl; external 'NeXusDLL.dll';

Die Callback-Funktion sieht folgendermaßen aus:

Delphi-Quellcode:

procedure cbNexus(aData : PFloatArray); cdecl;
var
  i : integer;
  fa : TFloatArray;
begin
  fa := aData^;
  for i := 0 to 31 do
  begin    
    Form3.OnData(nil, i, fa[i], Time-fStartTime);
  end;
end;

Die Methode Form3.OnData macht nichts weiter, als die Daten in ein Memo zu schreiben:

Delphi-Quellcode:

procedure TForm3.OnData(Sender: TObject; aChannel: integer; aValue: single; aTime: TTime);
begin
  memo1.Lines.Add(Format('%i: %10.2f',[aChannel, aValue]));
end;

Das Problem ist nun, das der Zugriff auf Form3 zu einer AV führt. Schreibe ich die Messwerte einfach nur in eine Datei oder ins Eventlog läuft alles.
Woran könnte das liegen?