DGL • Thema anzeigen - Quad Aus Vielen Quads Zeichnen...

Quad Aus Vielen Quads Zeichnen...

Moderator: DGL-Team

Seite 1 von 1

[ 2 Beiträge ]

Vorheriges Thema | Nächstes Thema

Autor

Nachricht

Aya

Betreff des Beitrags:

Verfasst: Sa Jul 12, 2003 15:06

DGL Member

Registriert: Di Dez 03, 2002 22:12
Beiträge: 2105
Wohnort: Vancouver, Canada
Programmiersprache: C++, Python

Hi,

kann mir mal wer sagen was hierdran falsch is???
Ich möchte ein großes Quad aus vielen kleinen Quads zusammensetzen... aber irgendwie klappt das nich so ganz

Kann ich evtl einen VertexArray nicht so definieren??
Array of Array[1..4] of Array[0..2] of Single;

Code:

type
  TVertexArray = Record
    Vertex: Array of Array[1..4] of Array[0..2] of Single;
    Normals: Array of Array[1..4] of Array[0..2] of Single;
    TexCoord: Array of Array[1..4] of Array[0..1] of Single;
    Matrix: TMatrix;
    Typ: Cardinal;
  end;
 
procedure CreateField;
var
  F, x, y, i: Integer;
  XCen, ZCen, XDiv, ZDiv: Single;
begin
  XDiv:=FWidth / FDivisions;
  ZDiv:=FHeight / FDivisions;
  XCen:=FX - (FWidth / 2);
  ZCen:=FZ - (FHeight / 2);
  SetLength(FVertexArray.Vertex,FDivisions * FDivisions);
  SetLength(FVertexArray.Normals,FDivisions * FDivisions);
  SetLength(FVertexArray.TexCoord,FDivisions * FDivisions);
  for x:=1 to FDivisions do begin
    for y:=1 to FDivisions do begin
      F:=((x-1) * FDivisions) + y - 1;
      for i:=1 to 4 do begin
        case i of
          1: begin
               FVertexArray.Vertex[F,i,0]:=XCen + (x * XDiv);
               FVertexArray.Vertex[F,i,1]:=FY;
               FVertexArray.Vertex[F,i,2]:=ZCen + (y * ZDiv);
             end;
          2: begin
               FVertexArray.Vertex[F,i,0]:=XCen + (x * XDiv) + XDiv;
               FVertexArray.Vertex[F,i,1]:=FY;
               FVertexArray.Vertex[F,i,2]:=ZCen + (y * ZDiv);
             end;
          3: begin
               FVertexArray.Vertex[F,i,0]:=XCen + (x * XDiv) + XDiv;
               FVertexArray.Vertex[F,i,1]:=FY;
               FVertexArray.Vertex[F,i,2]:=ZCen + (y * ZDiv) + ZDiv;
             end;
          4: begin
               FVertexArray.Vertex[F,i,0]:=XCen + (x * XDiv);
               FVertexArray.Vertex[F,i,1]:=FY;
               FVertexArray.Vertex[F,i,2]:=ZCen + (y * ZDiv) + ZDiv;
             end;
        end;
        FVertexArray.Normals[F,i,0]:=0;
        FVertexArray.Normals[F,i,1]:=1;
        FVertexArray.Normals[F,i,2]:=0;
        FVertexArray.TexCoord[F,i,0]:=0;
        FVertexArray.TexCoord[F,i,1]:=0;
      end;
    end;
  end;
  FVertexArray.Typ:=GL_QUADS;
end;
 
procedure Draw;
begin
  glPushMatrix;
    glVertexPointer(3,GL_FLOAT,12,FVertexArray.Vertex);
    glTexCoordPointer(2,GL_FLOAT,8,FVertexArray.TexCoord);
    glNormalPointer(GL_FLOAT,12,FVertexArray.Normals);
    glEnableClientState(GL_VERTEX_ARRAY);
    glEnableClientState(GL_TEXTURE_COORD_ARRAY);
    glEnableClientState(GL_NORMAL_ARRAY);
    glDrawArrays(FVertexArray.Typ,0,Length(FVertexArray.Vertex));
  glPopMatrix;
end;

FX, FY und FZ sind der mittelpunkt der fläche die gebildet werden soll.
FWidht, FHeight ist die Höhe/Breite
FDivisions ist die anzahl der Quads die in dem großen Quad sein sollen.

Hilfe..

Au'revoir,
Aya~

Nach oben

Aya

Betreff des Beitrags:

Verfasst: Sa Jul 12, 2003 15:11

DGL Member

Registriert: Di Dez 03, 2002 22:12
Beiträge: 2105
Wohnort: Vancouver, Canada
Programmiersprache: C++, Python

Ahh...
hatte in der Zeile nen fehler:

Code:

glDrawArrays(FVertexArray.Typ,0,Length(FVertexArray.Vertex));

das muß so:

Code:

glDrawArrays(FVertexArray.Typ,0,Length(FVertexArray.Vertex) * 4);

*boing*

Au'revoir,
Aya~

Nach oben

Seite 1 von 1

[ 2 Beiträge ]

Foren-Übersicht » Programmierung » OpenGL

Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 5 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.