Delphi-PRAXiS
Seite 47 von 103   « Erste     37454647 48495797     Letzte »    

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Software-Projekte der Mitglieder (https://www.delphipraxis.net/26-software-projekte-der-mitglieder/)
-   -   Andorra 2D [Ver. 0.4.5.1, 31.12.08] (https://www.delphipraxis.net/81314-andorra-2d-%5Bver-0-4-5-1-31-12-08%5D.html)

Florian H 15. Feb 2008 19:34

Re: Andorra 2D [Ver. 0.30 STABLE, 04.01.08]
 
Naja, ich musste z.B. folgende Zeile auskommentieren, da ich keine äquivalente Eigenschaft finden konnte:
Delphi-Quellcode:
AdFont1.XXX('Arial',[],10,true,2,2,120); //Erzeugt den Font mit Schatten, 2px von der Schrift entfernt und in Stufe drei "geblurt" mit einem Alpha-Wert von 128.
Das XXX nur, weil ich das wohl rausgelöscht habe was davor da stand beim Testen -.- Aber da es ja dein Codeschnippel ist, wirst du wissen was ich meine :D
Aber das kann ja nicht gutgehen.. denke ich mal ^^ Fehlt irgendwie sowas wie ne Fonttextur..was auch in der Exception erahnbar wird. Nur.. wie mach ich das, dass es so ist wie oben?

Machen tu ich damit dann eigentlich nur das:
Delphi-Quellcode:
adfont1.Color := ad_RGB(0,0,0);
AdFont1.TextOut(25, 578, inttostr(1234));
Grüßle
flo

igel457 15. Feb 2008 19:40

Re: Andorra 2D [Ver. 0.30 STABLE, 04.01.08]
 
Du musst den Font nun mittels:
Delphi-Quellcode:
AdFont1 := AdDraw.Fonts.GenerateFont('Arial',12,[], etc.);
erzeugen. Dabei werden die Fonts zwischengespeichert, du kannst also getrost auch in deiner Game-Loop
Delphi-Quellcode:
with AdDraw.Fonts.GenerateFont(etc.) do
begin
  Color := Ad_ARGB(255, 255, 255, 0);
  TextOut(0,0,'Test');
end;
schreiben.

Mit dem Canvas funktioniert es einfach so:
Delphi-Quellcode:
with AdDraw.Cavnas do
begin
  Font := AdDraw.Fonts.GenerateFont(etc.);
  Color := Ad_ARGB(255, 255, 255, 0);
  TextOut(0,0,'Test');
end;
Hoffe dir geholfen zu haben,
Andreas

Florian H 15. Feb 2008 21:46

Re: Andorra 2D [Ver. 0.30 STABLE, 04.01.08]
 
Ich danke dir, das funktioniert :)

Das mit dem ImageEditor eilt jetzt von mir aus auch nicht mehr, habe mir einen Quick&Dirty-Workarround reinprogrammiert :>

Florian H 18. Feb 2008 22:02

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

gibts eine Möglichkeit, an das Bild in einer TAdImageList zu kommen? Ich möchte/muss gespeicherte Bilder aus so einer Liste in einem normalen TBitmap verwenden können ...

Grüßle,
flo

igel457 19. Feb 2008 13:14

Re: Andorra 2D [Ver. 0.30 STABLE, 04.01.08]
 
Klar:
Delphi-Quellcode:
AdImageList.Items[i].Texture.SaveToGraphic(bmp);
oder so ähnlich...

chaosben 19. Feb 2008 14:27

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

Sorry, falls ich jetzt eine Frage stelle die du vielleicht schon 100mal beantwortet hast.
Kann ich A2D auch mit einer OpenGL ES Implementation (z.B. die Vincent Mobile 3D Rendering Library) nutzen?

igel457 19. Feb 2008 15:14

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

Leider kenne ich mich damit nicht so gut aus - theoretisch spricht aber nichts dagegen. Im Notfall kannst du ja immernoch das OpenGL-Plugin einfach entsprechend abändern.

Edit:
Ich verwende momentan den dglOpenGL - Header. Ich weiß nicht, inwiefern der das unterstützt.

chaosben 19. Feb 2008 16:33

Re: Andorra 2D [Ver. 0.30 STABLE, 04.01.08]
 
Naja, die "OpenGL ES" - Definition stellt so eine Art "Essenz" von OpenGL dar. Es ist im Prinzip ein abgespeckte Variante von OpenGL - einige Funktionen fehlen einfach.

Na mal sehen, ich probier es mal.

btw: Falls das funktionieren sollte, kann A2D auch auf PDA's/Smartphones und Konsorten laufen. :)

igel457 19. Feb 2008 17:06

Re: Andorra 2D [Ver. 0.30 STABLE, 04.01.08]
 
Mich würde das auch interessieren - wäre super wenn das ginge. Wenn du noch fragen dazu hast, dann melde dich einfach bei mir.

chaosben 19. Feb 2008 17:18

Re: Andorra 2D [Ver. 0.30 STABLE, 04.01.08]
 
Ich habs jetzt mal schnell überflogen und es sieht so aus, als ob es geht. Ich werd morgen mal versuchen, das Ganze in die Tat umzusetzen. Falls etwas nutzbares rauskommt, sag ich Bescheid. :)


Alle Zeitangaben in WEZ +1. Es ist jetzt 06:50 Uhr.
Seite 47 von 103   « Erste     37454647 48495797     Letzte »    

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-2025 by Thomas Breitkreuz