LoadLibrary geht hier - dort nicht!?

[DracoBlue]

hallo!

Ich weiss wirklich nicht mehr weiter. Habe dieses Stückchen Quelltext, einmal auf meinem einem Rechner und dann zu testzwecken auf einem anderen probiert. Aus irgendeinem für mich unerkenntlichen grund bleibt der pointer von to_upper auf dem 2ten rechner auf NIL und auf dem ersten ist alles ok. "UnserTollesHandle" ist immer ungleich 0, also die DLL scheint er ja zu finden.

Delphi-Quellcode:

type
  THandle = Integer;
  var
    UnserTollesHandle: THandle;

 procedure initializes(pfad:string);
    var dllname:string;
   begin
    dllname:=pfad+'dllname.dll';
    UnserTollesHandle := LoadLibrary(PChar(dllname));
    if UnserTollesHandle <> 0 then
    begin
     @to_upper := GetProcAddress(UnserTollesHandle, 'to_upper');
     SysLOG(' to_upper is at '+inttostr(Longword(Addr(u_scm.to_upper)))+'\');
     SysLOG(' to_upper returns '+inttostr(u_scm.to_upper(1,2))+'\');
    end else exception.create('Can''t initialize the dll');
 end;

Wenn jemand ein ähnliches Problem hatte, oder vielleicht so weiss woran es liegen kann - vielen dank im vorraus :).

Bis denne,
Jan