Gibt es eine Möglichkeit Heightmap Daten aus einer Bmap auszulesen, ohne irgendwelche anderen Units außer die Opengl.pas zu verwenden ?

_________________
Wer Ordnung hält, ist zu faul zum Suchen

Ja...du lädst deine Heightmap in ein ganz normales TBitmap, und dort kannst du die Farbwerte der Bildpunkte des Bitmaps doch ganz einfach über die Eigenschaft TBitmap.Canvas.Pixels (=Array of Array of TColor) auslesen.Dazu benötigst du nur die mit Delphi gelieferte Unit, in der TBitmap deklariert ist (Graphics).

Diese Farbwerte im Canvas.Pixels-Array musst du dann nur noch durch den Farbwert clWhite dividieren, und schon hast du deine Höhenwerte (sofern du ein Graustufenbitmap verwendest)...ich wüsste jetzt eigentlich auch gar nicht wie man das anders machen würde.

_________________
www.SaschaWillems.de | GitHub | Twitter | GPU Datenbanken (Vulkan, GL, GLES)

da ich das so irgendwie nie hinbekommen habe und es auch schwachsinnig fand ein grayscale Bild farbig auszulesen hab ich es auch etwas anders gemacht, das Zauberwort heißt Scanline. Dummerweise in C++, aber die VCL sollte ja ungefähr die gleiche sein...

Es schadet ja hoffentlich trotzdem nicht, den Code hier zu posten:

Das // ist das Kommentarzeichen von C und auch PHP. Sorry, dass das jetzt in C++ ist... aber ich weiß gerade nicht mehr wie Zeiger in Delphi gehen und teilweise umsetzten ist dann auch blöd.
Ich glaube in der Dokumentation gibts nen gutes Beispiel zu Scanline, das fast genauso ist. Ich ahb leider gerade nur kein Delphi zur Hand um nachzuschauen. Vieleicht kann ich den Delphi Code noch nachliefern... oder jemand von den anderen, wenns überhaupt jemanden interessiert B)

MfG
Mindwalker

[Edit] Wie man vieleicht sieht, hab ich aus bequemlichkeit einfach ne bestehende Image Komponente genommen, der Code zum Laden sieht so aus
Image1.Picture.LoadFromFile(OpenDialog1.FileName);
Man kann das natürlich auch ohne OpenDialog machen.
[/Edit]

_________________
"OpenGL verbindet"<br>- für die Völkerverständigung zwischen Delphi und C++ ^^

Will dir ja nicht vor den Kopf stossen, aber was ist an der Nutzung von Scanlines zum Laden seiner Höhendaten für die Heightmap so toll...die Lösung ist nicht nur umständlich, sondern bringt ggü. der Nutzung des Pixelarrays des TCanvas eines Bitmaps doch absolut keine Vorteile...

Dies ist der Code wie ich ihn (ungefähr) meinte, und der sieht nicht nur unkomplizierter aus, sondern macht auch genau dasselbe :
<!--pas--></span><table border='0' align='center' width='95%' cellpadding='3' cellspacing='1'><tr><td>Delphi-Source </td></tr><tr><td id='CODE'><!--pas1--><pre><span class='reserved'>for</span> x := <span class='integer'>0</span> <span class='reserved'>to</span> Bmp.Width-<span class='integer'>1</span> <span class='reserved'>do</span>
<span class='reserved'>for</span> y := <span class='integer'>0</span> <span class='reserved'>to</span> Bmp.Height-<span class='integer'>1</span> <span class='reserved'>do</span>
HeightData[x,y] := Bmp.Canvas.Pixels[x,y] <span class='reserved'>div</span> clWhite;</pre><!--pas2--></td></tr></table><span class='postcolor'><!--pas3-->

_________________
www.SaschaWillems.de | GitHub | Twitter | GPU Datenbanken (Vulkan, GL, GLES)

Du hast doch selbst gesagt, dass du nicht wüsstest, wie man das anders machen würde... Anstatt dich zu freuen, dass ich hier ne andere lösung präsentiere, meckerst du gleich rum

Nun ja, der Code oben sieht zT auch kompliziert aus, weil der ganze dynamische Kram drinn steht.

Und wenn es auf Geschwindigkeit ankommt (was hier wohl nicht der Fall ist) , ist es bestimmt schneller nur jeweils einen Wert pro Pixel einzulesen, anstatt drei einzulesen und noch zu teilen. Das mit der Umkopiererei in der zweiten Schleife könnte man auch bessser lösen, so dass eigentlich gar keine zweite Schleife benötigt wird.

Aber wie gesagt, es ging mir jetzt auch nicht darum deine Lösung auszubooten, sondern halt nur nen anderen Ansatz zu zeigen, der mir selbst auch logischer erscheint, da wie gesagt halt die Farbe gleich aus dem Spiel gelassen wird.

_________________
"OpenGL verbindet"<br>- für die Völkerverständigung zwischen Delphi und C++ ^^

Pixels ist um einiges langsamer als Scanline, aber da das hier ja nur einmal ausgelesen wird und das Bild klein ist, spielt das in diesem Fall vermutlich keine große Rolle.
Ich habe das mal ausprobiert und bei meinem Test war die scanline Methode ungefähr 300 Mal schneller. Das liegt unter anderem auch daran, daß man nicht für jeden Pixel eine Funktion aufruft. Beide Methoden haben ein Graustufen Bild als Basis benutzt.

Selbstverständlich kannst du das BMP auch direkt laden (ist ja ein recht einfaches Bildformat, insbesondere wenn du dich auf 8 Bit Graustufen BMPs beschränkst). Dann brauchst du nicht mal die VCL und dein Programm kann ziemlich klein bleiben (insbesodere wenn du es schaffst, auch noch auf die sysutils zu verzichten)...

_________________
Viel Spaß beim Programmieren,
Mars
http://www.basegraph.com/

Also erstmal danke an alle !!!
Ich hab das jetzt irgendwie hingekriegt. Ich hab die Pixel Ausles Methode genommen, weil ich bei dem C Source nicht so richtig durchsehe.
Trotzdem Danke Mindwalker.

_________________
Wer Ordnung hält, ist zu faul zum Suchen