[Andorra] seltsamster Fehler bei AdDraw.dllname:='xy.dll'

[Spiderpig_GER_15]

Hallo,

vermutlich hat mein Problem weniger mit Andorra zu tun, aber er tritt nur dann auf, wenn ich Andorra verwende, folgendes Problem.

Code der auf meinem alten Rechner einwandfrei funktioniert hat, spuckt jetzt in der Zeile

Delphi-Quellcode:

  AdDraw.dllname:='AndorraOGL.dll'/'AndorraDX93D.dll';

foglenden Fehler aus:
"Project Project1.exe raised exception class EAccessViolation with message 'Acces violation at adress 000000000, Read of address 00000000'. Process stopped. Use Step or Run to continue."

Lasse ich die Zeile weg, kommt der standart Initialisieungsfehler von Andorra:
'Error while initializing Andorra 2D. Try to use another display '+
'mode or another video adapter.'

Habe die dll.'s schon ausgetauscht, ohne erfolg. Sie befinden sich im Projektordner.

Sonst mache ich mit Dll's nichts, also könnte auch ein allgemeines Dll Problem bei mir sein das nur bei andorra auftritt, da ich sie sonst nie bewusst verwene^^


MfG

Spiderpig

[Die Muhkuh]

Absoluter Pfad angeben wäre besser.

[Namenloser]

Haben die DLLs die gleiche Version wie die eingebundenen Units?

[Spiderpig_GER_15]

ja, alles genauso wie auf dem alten PC auf dem es funktioniert hat...

Brauch man spezielle files um dll. zu laden?

Eigentlich doch nicht, oder?

[igel457]

Hast du einen Grafikkartentreiber bzw. OpenGL Support und die DirectX Runtimes (gibt es auf der Microsoft Website) installiert?

Wo genau tritt die Exception auf? Debuge das doch mal durch.

[Spiderpig_GER_15]

also ich spiele die neuesten Spiele, ich vermute ich hab OpenGL und DirectX, Bei einem Spiel von einem Freund, auch andorra, kann man das plugin aussuchen, beides funktioniert bei mir...

Hab das ge debuggt, der fehler kommt nach der dll lade Zeile

[Die Muhkuh]

Passiert das gleiche bei nem absolutem Pfad?

[Spiderpig_GER_15]

Wenn das ein absoluter Pfad ist, ja:

Delphi-Quellcode:

  AdDraw.DllName := 'C:\Programme\Borland\Delphi7\Projects\Dash\andorraogl.dll';

[igel457]

Zitat:

Hab das ge debuggt, der fehler kommt nach der dll lade Zeile

Also bei LoadLibrary?

[Tumm]

AdDraw richtig initialisiert?

[Spiderpig_GER_15]

ja, denke ich schon:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  AdPerCounter := TAdPerformanceCounter.Create;

  AdDraw := TAdDraw.Create(self);
  AdDraw.DllName := ExtractFilePath(ParamStr(0)) + 'andorraOGL.dll';

  if AdDraw.Initialize then
  begin
    Application.OnIdle := Idle;
    AdImageList := TAdImageList.Create(AdDraw);
    with AdImageList.Add('tank_red') do
    begin
      Texture.LoadGraphicFromFile('tank_red.bmp',true,clFuchsia);

    end;
    AdImageList.Restore;

    angle:= 0;

  end
  else
  begin
    ShowMessage('Error while initializing Andorra 2D. Try to use another display '+
                'mode or another video adapter.');
    Close;
  end;
end;

[igel457]

Und die Fehlermeldung wird hier geworfen?

Delphi-Quellcode:

procedure TAdDllLoader.LoadLibrary(afile: string);
var
  InfoProc: TAndorra2DLibraryInformation;
begin
  if FileExists(afile) then
  begin
    //If a library is already loaded, unload it
    if LibraryLoaded then
      UnLoadLibrary;
 
    {$IFDEF Win32}
    DllHandle := Windows.LoadLibrary(PChar(afile)); //<-- Hier
    {$ELSE}
    DllHandle := dynlibs.LoadLibrary(PChar(afile));
    {$ENDIF}

[Spiderpig_GER_15]

Delphi-Quellcode:

procedure TAdDllLoader.LoadLibrary(afile: string);
var
  InfoProc:TAndorra2DLibraryInformation;
  AbilitiesProc:TAndorra2DLibraryAbilities;
begin
  if fileExists(afile) then
  begin
    if LibraryLoaded then
    begin
      UnLoadLibrary;
    end;
    {$IFDEF Win32}
      DllHandle := Windows.LoadLibrary(PChar(afile));
    {$ELSE}
      DllHandle := dynlibs.LoadLibrary(PChar(afile));  
    {$ENDIF}
    if LibraryLoaded then
    begin
      @CreateApplication := GetProcAddress(DllHandle, 'CreateApplication');

      //Get information
      @InfoProc := GetProcAddress(DllHandle, 'Andorra2DLibraryInformation');
      InfoProc(LibInfo);

      //Get abilities
      @AbilitiesProc := GetProcAddress(DllHandle, 'Andorra2DLibraryAbilities');
      AbilitiesProc(LibAbilities);  //<=== Hiernach
   end;
end;

[igel457]

Du hast eine veraltete Version des Andorra 2D Quellcodes. Die aktuelle Version sieht so aus: http://andorra.cvs.sourceforge.net/v...14&view=markup

Die "Abilities"-Funktion gibt es nicht mehr - die heißt jetzt "Properties".

[Namenloser]

Zitat:

Zitat von NamenLozer

Haben die DLLs die gleiche Version wie die eingebundenen Units?

Was hab ich gesagt... :mrgreen:

[Spiderpig_GER_15]

bin schon am Austauschen, das kam mir auch komisch vor das du da was anderes stehen hast *hope* :D

[igel457]

Zitat:

Zitat von NamenLozer

Zitat:

Zitat von NamenLozer

Haben die DLLs die gleiche Version wie die eingebundenen Units?

Was hab ich gesagt... :mrgreen:

Tja, die neuen Versionen (ab 0.4) meckern mit einer entsprechenden Inkompatibilitäts-Fehlermeldung. Seine Version scheint also etwas älter zu sein.

[Spiderpig_GER_15]

Jetzt will ich aber acuh alles richtig machen, auf welche Ornder muss ich alles die Library Verlinkung machen?

[Spiderpig_GER_15]

Okay, hab alles, geht, dankeeeee

Hab die neue Version genommen dann klappt alles!