Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   Delphi Textur auf Würfel legen (TCanvas) (https://www.delphipraxis.net/57339-textur-auf-wuerfel-legen-tcanvas.html)

AmY 19. Nov 2005 16:32


Textur auf Würfel legen (TCanvas)
 
Ich hab ein bisschen in Delphi gewütet :-)
Vielleicht ein bisschen konstruktive Kritik. Es ist nichts im Quelltext beschriftet, aber man findet da auch so ganz gut durch denke ich. Mit dem Kreis oben rechts lassen sich verschiedene Texturen auf den Würfel legen. Mit dem 'langen' Button oben öffnet sich ein Menü, durch das die Perspektive und die Größe verstellt werden kann. Vielleicht gibts ja Ideen wie man diese Problemstellung noch anders Lösen könnte als durch Pixelübertragung und vergleichen der Z-Werte. Vielleicht durch dreiecke die man auf die Seiten legt?
Vll. beschrifte ich den Quelltext gleich mal doch, aber erstmal war ich so neugierig was ihr dazu sagt ^^

Download

Lg AmY

mimi 20. Nov 2005 12:38

Re: Textur auf Würfel legen (TCanvas)
 
ich habe mir mal die exe angeschaut: nicht schlecht....

wenn der qullcode noch schön struckturirt währe z.b. leerzeichen drin währen und kommetare(was du schon geschrieben hast oben) währe es ein tolls beispiel projekt meiner meinung nach...

turboPASCAL 20. Nov 2005 13:44

Re: Textur auf Würfel legen (TCanvas)
 
Liste der Anhänge anzeigen (Anzahl: 1)
:thumb:

Ich werde noch Irre, da habe ich gestern Abend angefangen und wollte einen alten Pascalcode (Texturemapping) in Delphi umsetzen. Leider habe ich es dann aufgegeben (2.00 Uhr), und dann kommst du und wedelst mir mit deinem vor der Nase herum. :mrgreen:

PS.: ohne meckern zu wollen aber die schreibweise bzw. das einrücken in deinem code ist ein bissel gewöhnungsbedürftig.

AmY 20. Nov 2005 16:46

Re: Textur auf Würfel legen (TCanvas)
 
Liste der Anhänge anzeigen (Anzahl: 1)
so jetzt nochmal mit text, vielleicht wirds jetzt etwas verständlicher :-)

UND: ich suche immer noch möglichkeiten die ganze sache zu beschleuningen, irgend wer meinte mal das ginge über dreiecke die man auf die flächen legt, aber ich hab ka wie das gehn soll, also 'help me' :wink:

lg amy

P.S.: Die erklärung ist ganz einfach - ich rücke nicht ein und strukturiere nicht :-)

turboPASCAL 20. Nov 2005 18:00

Re: Textur auf Würfel legen (TCanvas)
 
Liste der Anhänge anzeigen (Anzahl: 1)
Zitat:

Zitat von AmY
so jetzt nochmal mit text, vielleicht wirds jetzt etwas verständlicher :-)

Puh, wenn das mit dem rRechnen nicht wäre ja. ;)

Zitat:

UND: ich suche immer noch möglichkeiten die ganze sache zu beschleuningen, irgend wer meinte mal das ginge über dreiecke die man auf die flächen legt, aber ich hab ka wie das gehn soll, also 'help me' :wink:
Nunja, heutige 3D Programme machen das auch mit vielen Vierecken. Dasowas aber ein wenig blöd aussieht wenn man runde Objeckte darstellt werden Dreiecke benutzt. In deinem Fall also auf das zeichnen auf den Canvas ist die Viereckmethode besser. Mit BitBlt und StretchBlt ist es schneller ein Viereck zu füllen als zweimal ein Dreieck.

Zitat:

Die erklärung ist ganz einfach - ich rücke nicht ein und strukturiere nicht :-)
Na, dann habe ich das mal schnell für dich gemacht. ( So etwas geht doch auf die Augen, nicht oder ? ;) ) Das Image habe ich auch herausgenommen da es doch ein wenig mehr Zeit braucht gegenüber dem directem zeichnen auf den Canvas der Form.

Timer unter Windows sollte man auf max. 25 ms. stellen, 10 ms bringt nix da Windows nur 25 ms schaft.


Alle Zeitangaben in WEZ +1. Es ist jetzt 21:52 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