Atmel 89C51CC03CA mit Atisp.dll programmieren

Ich möchte dies auch programmieren, bekomme aber bei ispSelectDevice 
immer false zurück. IspInit kommt ist aber true.Die Funktion habe ich 
wie folgt deklariert:


function ispSelectDevice(device:LongInt):boolean;
stdcall; external 'AtJniIsp.dll';

Aufruf:

if ispInit then begin
    Memo1.Lines.Add('Init OK');
  end
  else begin
    Memo1.Lines.Add('Init failed');
    Exit;
  end;

  dev:=integer(AT89C51CC03);
  if ispSelectDevice(dev) then begin
    Memo1.Lines.Add('Device select OK');
  end
  else begin
    Memo1.Lines.Add('Device select failed');
    Exit;
  end;

Hat jemand ein Beispielprogramm, welches schon läuft?

da es offensichtlich ein C DLL ist, muss man nicht stdcall, sondern 
cdecl nehmen. Damit geht es nun:

function ispSelectDevice(device:LongInt):Word; //boolean;
cdecl; external 'AtIsp.dll';


Nun macht aber der Aufruf Probleme:
status := ispOpenCanPort(250, 0, 1, 1, 0, 115200);

function ispOpenCanPort(bitrate: Longword; pTYpe: Byte; port:word; 
channel:Byte = 1; CRIS: Byte =0; baudrate:LongWord=115200):LongWord;
cdecl; external 'AtIsp.dll';

Am Ende des Aufrufes kommt dann immer Zugriff bei Adresse xxxxxx, 
Schreiben bei Adresse 0

Vielleicht soll ich aber in ein Delphiforum wechseln, da aber hier schon 
Experten sind, die das schon gelöst haben, wollte ich hier mal anfragen.