AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Multimedia [Andorra 2D] Fragen zu TAdDraw.Restore
Thema durchsuchen
Ansicht
Themen-Optionen

[Andorra 2D] Fragen zu TAdDraw.Restore

Ein Thema von Leanahtan · begonnen am 17. Sep 2011 · letzter Beitrag vom 17. Sep 2011
Antwort Antwort
Leanahtan

Registriert seit: 5. Jun 2009
62 Beiträge
 
Turbo Delphi für Win32
 
#1

AW: [Andorra 2D] Fragen zu TAdDraw.Restore

  Alt 17. Sep 2011, 23:28
Sorry für den Doppelpost, aber ich habe den Quellcode jetzt nochmal so umgeschrieben, dass das Problem besser nachvollziehbar sein sollte. Meine Fragen zu TAdDraw.Restore bleiben zwar (was passiert mit den an TAdDraw gekoppelten Objekten, wie z.B. TAdImageList und wie kann ich dort auf den Restore reagieren, um gegebenenfalls Grafiken neu zu laden), ich bin mir aber ziemlich sicher, das mein momentanes Problem nicht damit zusammenhängt. Folgende Prozedur wird dem Idle-Event des Hauptprogramms zugewiesen,direkt bevor das Fenster mit ShowModal angezeigt wird.

Delphi-Quellcode:
procedure TShowMapForm.DrawMapAd(Sender:TObject; var Done:boolean);
begin
  AdDraw.Restore;
  if AdDraw.CanDraw then //Wenn überhaupt auf das AdDraw gezeichnet werden kann dann...
  begin
    AdDraw.ClearSurface(clBlack);
    with AdMapImageList.Find('Map') do
    begin
      Texture.LoadFromGraphic(MapBitmap);
      Restore;
    end;
    AdDraw.BeginScene;
      // folgendes wird erfolgreich gezeichnet
      AdMapImageList.Find('Map').Draw(AdDraw,0,0,0);

      // hier sollten alle Tiles einzeln gezeichnet werden, aber nichts passiert
      CreateMapAdImage(AdDraw,MapFieldDataArray,Mapwidth,MapHeight);

      // Zum Test wird versucht, nochmal gesondert für ein einzelnes Tile ein BMP in die TAdImageList zu laden und dann das Tile zu zeichnen ...
      MapFieldDataArray[0,0].GTL0.LoadImgs;
      // zur Kontrolle BMP speichern - Bild existiert wie erwartet, und ist auch nicht leer (siehe Anhang)
      MapFieldDataArray[0,0].GTL0.ImgBmps[0].SaveToFile('delme.bmp');
      MapFieldDataArray[0,0].GTL0.AdImageList.find('0').Texture.LoadFromGraphic(MapFieldDataArray[0,0].GTL0.ImgBmps[0]);
      MapFieldDataArray[0,0].GTL0.AdImageList.Restore;
      MapFieldDataArray[0,0].GTL0.AdImageList.find('0').Draw(AdDraw,0,0,0);
      // ... aber auch obiger Code zeichnet nichts ^^

    AdDraw.EndScene;

    AdDraw.Flip; //Präsentiert die gezeichneten Dinge auf dem Bildschirm.
  end;
end;
Da ich AdDraw erzeugt habe, bevor ich das Fenster aufrufe, muss ich anscheinend irgendwo Restore aufrufen. Mir ist klar, dass das hier im Idle-Event performance-mäßig ungünstig ist.
Das gespeicherte delme.bmp hab ich angehängt. Ich würde auch gerne das Bild aus der ImageList speichern, aber entsprechende versuche sind bisher gescheitert (bzw. ließen sich diese Dateien dann nicht öffnen).
Angehängte Grafiken
Dateityp: bmp delme.bmp (8,1 KB, 4x aufgerufen)

Geändert von Leanahtan (17. Sep 2011 um 23:31 Uhr)
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 07:43 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz