Funzt in d2007 . teste es jetz in athens.
Bist du sicher das man in function GetSymbol(Name: String): Pointer;
Delphi-Quellcode:
{$IFDEF VER185}
Result := GetProcAddress(Lib, PAnsiChar(Name));
{$ELSE}
Result := GetProcAddress(Lib, PWideChar(Name));
{$ENDIF VER185}
einfach durch
Result := GetProcAddress(Lib, PChar(Name));
ersetzen kann?