DGL • Thema anzeigen - Heightmap funktioniert nicht -

Heightmap funktioniert nicht -_-

Moderator: DGL-Team

Seite 1 von 1

[ 4 Beiträge ]

Vorheriges Thema | Nächstes Thema

Autor

Nachricht

LH_Freak

Betreff des Beitrags: Heightmap funktioniert nicht -_-

Verfasst: So Mär 26, 2006 21:46

DGL Member

Registriert: So Dez 19, 2004 00:27
Beiträge: 454
Wohnort: Nürnberg

Ich bin hier am verzweifeln -_-
Nachdem dem Versuch die Heightmap wie im Tut zu rendern zum 10.000 mal schief gegangen ist (lässt sich nicht kompilieren, usw.) hab ich mal versucht das ganze wie in SoSs Newton Demo zu rendern. Das ganze kann ich zwar kompilieren, aber ich sehe nix.

Code:

constructor THeightMap.Create(pHeightMapBitmap : String);
const
 Scale = 1;
var
 Bitmap : TBitmap;
 x,y,i  : Integer;
 VTmp   : array[0..3] of TVector3f;
 MTmp   : TMatrix4f;
 Min    : TVector3f;
 Max    : TVector4f;
 S0     : TVector3f;
 S1     : TVector3f;
 W,H    : Single;
begin
if not FileExists(pHeightMapBitmap) then
 exit;
Bitmap := TBitmap.Create;
Bitmap.LoadFromFile(pHeightMapBitmap);
SetLength(VA, Bitmap.Width*Bitmap.Height*4);
SetLength(TC, Bitmap.Width*Bitmap.Height*4);
W := Bitmap.Width/2;
H := Bitmap.Height/2;
i := 0;
for y := 0 to Bitmap.Height-2 do
 for x := 0 to Bitmap.Width-2 do
  begin
  // Vertices
  VA[i+3]  := V3((x-W)*Scale,   Trunc(Bitmap.Canvas.Pixels[X+1,Y+1]/clWhite*255)*0.15-32, (y-H)*Scale);
  VA[i+2]  := V3((x-W+1)*Scale, Trunc(Bitmap.Canvas.Pixels[X+2,Y+1]/clWhite*255)*0.15-32, (y-H)*Scale);
  VA[i+1]  := V3((x-W+1)*Scale, Trunc(Bitmap.Canvas.Pixels[X+2,Y+2]/clWhite*255)*0.15-32, (y-H+1)*Scale);
  VA[i  ]  := V3((x-W)*Scale,   Trunc(Bitmap.Canvas.Pixels[X+1,Y+2]/clWhite*255)*0.15-32, (y-H+1)*Scale);
  // Texture coordinates
  TC[i][0] := x/Bitmap.Width;
  TC[i][1] := (y+1)/Bitmap.Height;
 
  TC[i+1][0] := (x+1)/Bitmap.Width;
  TC[i+1][1] := (y+1)/Bitmap.Height;
 
  TC[i+2][0] := (x+1)/Bitmap.Width;
  TC[i+2][1] := y/Bitmap.Height;
 
  TC[i+3][0] := x/Bitmap.Width;
  TC[i+3][1] := y/Bitmap.Height;
 
  inc(i,4);
  end;
Bitmap.Free;
end;
 
procedure THeightMap.Render;
begin
glDisable(GL_LIGHTING);
glEnable(GL_TEXTURE_2D);
glDisableClientState(GL_NORMAL_ARRAY);
//glBindTexture(GL_TEXTURE_2D, TexID);
glVertexPointer(3, GL_FLOAT, 0, @VA[0]);
glTexCoordPointer(2, GL_FLOAT, 0, @TC[0]);
glDrawArrays(GL_QUADS, 0, Length(VA));
glEnableClientState(GL_NORMAL_ARRAY);
glDisable(GL_TEXTURE_2D);
glEnable(GL_LIGHTING);
end;

-_- entweder mag mich delphi net, oder ich bin einfach nich für OGL geschaffen -_-

Nach oben

luketheduke

Betreff des Beitrags:

Verfasst: Mo Mär 27, 2006 14:35

DGL Member

Registriert: Fr Mai 14, 2004 18:56
Beiträge: 804
Wohnort: GER/OBB/TÖL-WOR/Greiling

Bei schwarzem Bildschirm: Versuch mal, n bisschen rauszuzoomen und überprüf, ob du dann noch innerhalb deiner clipping-werte (zFar, zNear) bist.

Und wieso machst du da so viel rumgescale?

Code:

vertex = V3(x,getrvalue(Bitmap.Canvas.Pixels[x,z]) * factor,y);

Sollte dicke reichen. Also verschalnk den Code ein bisschen und dann läufts vielleicht auch bald

Anstatt glDrawArrays kompilier ich sowas übrigens gleich in ne Display-Liste... ich schau mal kurz, ich hab irgendwo noch ne komplette THeightmap-Implementation.

Hui... da hab ich ja grausamste Formatierung drin... Im Konstruktor muss wohl auch noch nachgebessert werden, da wird zur zeit aus ner ini geladen, das is bei dir evtl. anders.
Ich hab das jetzt auch nicht getestet... aber wenn dus mal mit deinem vergleichst, kommst du evtl. auf was.

die erwiterung pas ist hier verboten... babababa.... und das in nem delphi-forum, frechheit sowas....

Du hast keine ausreichende Berechtigung, um die Dateianhänge dieses Beitrags anzusehen.

_________________

"User Error. Replace User and hit Continue."

Nach oben

dj3hut1

Betreff des Beitrags:

Verfasst: Di Mär 28, 2006 11:52

DGL Member

Registriert: Di Dez 27, 2005 12:44
Beiträge: 393
Wohnort: Berlin
Programmiersprache: Java, C++, Groovy

Hallo LH_Freak,

Hast du in deinem Code auch die entsprechenen Vertex-Arrays aktiviert?

Ich sehe dort nämlich kein

Code:

glEnableClientState(GL_VERTEX_ARRAY);

bzw.

Code:

glEnableClientState(GL_TEXTURE_COORD_ARRAY);

.

Falls es immer noch nicht funktioniert, würde ich ersteinmal versuchen, die Heightmap ohne Vertex-Arrays darzustellen.

Oder du renderst ersteinmal etwas ganz einfaches, wie z.B. ein simples Quadrat.

Bist du dir eigentlich sicher, dass du auch in die richtige Richtung schaust?

Viele Grüße
dj3hut1

P.S. was vielleicht noch sein könnte : wurde bei dir die Bitmap überhaupt korrekt geladen? (einfach mal Bitmap.Height und Bitmap.Width ausgeben lassen)

Nach oben

LH_Freak

Betreff des Beitrags:

Verfasst: Di Mär 28, 2006 17:46

DGL Member

Registriert: So Dez 19, 2004 00:27
Beiträge: 454
Wohnort: Nürnberg

Ich glaub Delphi/OGL wollen mich wirklich verarschen. Gestern abend geht nix, heute, selber Code: GEHT!!!! Ich versteh die Welt nimmer -.-
Aber danke an alle!

Nach oben

Seite 1 von 1

[ 4 Beiträge ]

Foren-Übersicht » Programmierung » OpenGL

Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 2 Gäste

Du darfst keine neuen Themen in diesem Forum erstellen.
Du darfst keine Antworten zu Themen in diesem Forum erstellen.
Du darfst deine Beiträge in diesem Forum nicht ändern.
Du darfst deine Beiträge in diesem Forum nicht löschen.
Du darfst keine Dateianhänge in diesem Forum erstellen.