Einzelnen Beitrag anzeigen

Benutzerbild von igel457
igel457

Registriert seit: 31. Aug 2005
1.622 Beiträge
 
FreePascal / Lazarus
 
#474

Re: Andorra 2D [Ver. 0.30 STABLE, 04.01.08]

  Alt 19. Feb 2008, 19:55
Hm, habe das gerade nochmal ausprobiert und es funktioniert bei mir ohne Probleme:
Delphi-Quellcode:
AdImageList1 := TAdImageList.Create(AdDraw);
with AdImageList1.Add('logo') do
begin
  Texture.LoadGraphicFromFile('icon64.png');
end;
AdImageList1.Restore;

bmp := TBitmap.Create;
AdImageList1[0].Texture.SaveToGraphic(bmp);
bmp.SaveToFile('C:\test.bmp');
bmp.Free;
Wenn dann müsste der Fehler in der Klasse TAdVCLFormat aus der Unit "AdVCLFormats" liegen. Du kannst höchstens mal versuchen, die neue Version davon zu verwenden, allerdings sollte das nicht viel bringen:
http://andorra.cvs.sourceforge.net/*...s?revision=1.2

Vielleicht kannst du ja mal ein wenig Debugen (TAdVCLFormat.Assign ist dabei wichtig).

Danke für den Hinweis, ich hoffe wir finden den Fehler,
Andreas
Andreas
"Sollen sich auch alle schämen, die gedankenlos sich der Wunder der Wissenschaft und Technik bedienen, und nicht mehr davon geistig erfasst haben als die Kuh von der Botanik der Pflanzen, die sie mit Wohlbehagen frisst." - Albert Einstein
  Mit Zitat antworten Zitat