Delphi-PRAXiS
Seite 2 von 3     12 3      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   Delphi Ein Bild als Kugel darstellen (https://www.delphipraxis.net/64229-ein-bild-als-kugel-darstellen.html)

SirThornberry 1. Mär 2006 18:10

Re: Ein Bild als Kugel darstellen
 
Liste der Anhänge anzeigen (Anzahl: 1)
Ich hab jetzt das "Berechnung" von turboPASCAL auf Scanline umgebaut und bei mir eingebaut.
Das Resultat (Exe + kugelobject-quelltext) ist im Anhang.

Der vorteil von dem Quelltext von turboPASCAL war das es einfach mehr nach einer Kugel aussieht. Mein Ansatz hingegen hatte nur auf einer der Achsen den Effekt erzielt (also nur auf X oder Y achse die Krümmung) dafür aber eine bessere Qualität des resultates durch das Stretchen mit halftone was bei dem neuen Algo wegfällt weil die pixel manuell kopiert werden. Mein erster Ansatz befindet sich jedoch weiter in der Quelltext unit mit "{}" auskommentiert.

Hilfe/Anmerkung zum angahangenen Programm: Wird einer der Richtungspfeilbuttons mit der rechten Maustaste angeklickt so rastet dieser ein und die Kugel rotiert so lange bis der Button mit der linken maustaste geklickt wird.

zecke 1. Mär 2006 18:14

Re: Ein Bild als Kugel darstellen
 
:hi: Respekt. Ist nicht schlecht, wenn auch das ERgebnis etwas pixelig bei mir ist. Aber der Kugeleffekt ist gelungen :thumb:

SirThornberry 1. Mär 2006 18:27

Re: Ein Bild als Kugel darstellen
 
ja, leider ist durch den kugeligeren Effekt :mrgreen: das etwas pixeliger geworden.

Ich hab eben nochmal eine neue Version hochgeladen (in dem letzten Beitrag wo das Beispiel war). Dadurch gibt es jetzt in dem Testprojekt die Option zwischen dem kugeligeren(pixeliger) und dem nicht so kugeligen(dafür nicht so pixelig) Effekt um zu schalten. (das Object in der Quelltextdatei wurde auch um das Property erweitert)

[Edit]
Ich hab grad noch einen Fehler festgestellt. Das bild wird zwar als Kugel dargestellt, aber wenn es wirklich die gesammte kugel wäre würde man nur die hälfte des Bildes sehen da die andere Hälfte auf der rückseite ist (dem ist aber leider im Moment nicht so, hab ich wohl beim programmieren nicht dran gedacht)
[/Edit]

turboPASCAL 1. Mär 2006 18:35

Re: Ein Bild als Kugel darstellen
 
Liste der Anhänge anzeigen (Anzahl: 1)
Ist gut geworden. Wenn man es jetzt noch übertreiben möchte muss noch das Bitmap gezoomt werden.

Schlecht zu erleutern, ich mach mal 'n Bild:

// Edit, ach da stehts ja schon im Edit. ;)

SirThornberry 1. Mär 2006 18:38

Re: Ein Bild als Kugel darstellen
 
wo ist dort gezoomt? Ich seh grad das du nen schönes panoramebild hast, kannste mir das mal per pn zukommen lassen?

turboPASCAL 1. Mär 2006 18:44

Re: Ein Bild als Kugel darstellen
 
welche grösse ? das bild hat 100 MB ! ;)

dahead 1. Mär 2006 18:50

Re: Ein Bild als Kugel darstellen
 
Bei Wikipedia gibts das Bild auch zum direkten Download:

http://de.wikipedia.org/wiki/Erde (Ganz unten)

Mit Eispanzer (Fotomontage): http://de.wikipedia.org/wiki/Bild:Na...8192_jpg90.JPG

turboPASCAL 1. Mär 2006 18:58

Re: Ein Bild als Kugel darstellen
 
Jupp, das ist das. Bei der NASA gibts das Original, das ist etwas grösser super Qualli.
Den Link habe ich aber nicht mehr.

Gezoomt ist der falsche Ausdruck das Bild um die Kugel wickeln, im moment sind es 4 Bilder die die dargestellt werden also je 1/4 der Kugel. Jetzt müsste beim Scanner immer der passende Teilcopiert werden.

:gruebel: verständlicher ?

SirThornberry 1. Mär 2006 22:16

Re: Ein Bild als Kugel darstellen
 
ich hab eben nochmal eine neue Version hoch geladen. Da intern jedoch kein 3D-Object erstellt wird sondern nur der Ausschnitt vom Quellbild welches dann verzerrt wird geschoben wird funktioniert das ganze nur solange man auf in der Horizontalen Scrollt. Wer mal vertikal scrollt wird also mitbekommen das der Nordpol/Sydpol falsch dargestellt wird.

turboPASCAL 1. Mär 2006 23:25

Re: Ein Bild als Kugel darstellen
 
:gruebel: Uh:
Zitat:

---------------------------
Kugeleffekt
---------------------------
Cannot create file "e:\tmp1.bmp". Zugriff verweigert.
---------------------------
OK
---------------------------
.

Habe es erst einmal mit einen Hexeditor korrig., das ist richtig gut.

:gruebel: Warum ist denn die Exe so gross ?


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:51 Uhr.
Seite 2 von 3     12 3      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz