DGL • Thema anzeigen - Problem mit 2D texturen und 3D Objekten

Problem mit 2D texturen und 3D Objekten

Moderator: DGL-Team

Seite 1 von 1

[ 15 Beiträge ]

Vorheriges Thema | Nächstes Thema

Autor

Nachricht

Jerk

Betreff des Beitrags: Problem mit 2D texturen und 3D Objekten

Verfasst: Sa Dez 29, 2007 18:33

DGL Member

Registriert: Fr Dez 28, 2007 20:24
Beiträge: 62
Wohnort: Berlin

Warum wird mein "Player" und die "Raketen" komplett in Schwarz gezeichnet?

Code:

 
procedure TForm1.SetupGL;
begin
  glClearColor(0, 0, 0, 0.0);            //Hintergrundfarbe
  glEnable(GL_DEPTH_TEST);          //Tiefentest aktivieren
  //glEnable(GL_CULL_FACE);          //Backface Culling aktivieren  - Erstmal aus
  glLineWidth(1);                            //Linienstärke
  glEnable(GL_LINE_SMOOTH);       // Anti aliasing
end;
 
procedure TForm1.Render;
var i :integer;
begin
  glClear(GL_COLOR_BUFFER_BIT or GL_DEPTH_BUFFER_BIT);
  glMatrixMode(GL_PROJECTION);
  glLoadIdentity;
  gluperspective(60,form1.height/form1.width,nearclipping,farclipping);
  glMatrixMode(GL_MODELVIEW);
  glLoadIdentity;
  glpushmatrix;
  gltranslatef(0,0,-16);
  glEnable(GL_TEXTURE_2D);
  glBegin(GL_QUADS);
   glcolor3f(1,1,1);
   glTexCoord2f(0,0); glVertex3f(-8,-10,0);
   glTexCoord2f(0,1); glVertex3f(-8,10,0);
   glTexCoord2f(1,1); glVertex3f(8,10,0);
   glTexCoord2f(1,0); glVertex3f(8,-10,0);
  glEnd;
  glpopmatrix;
  if bg=false then
   begin
    Background;
    bg:=true;
   end;
  for i := 1 to gnum do if raketen[i].vis then Raketen[i].draw;
  Drawplayer;
  SwapBuffers(DC);
end;
 
Procedure Tform1.DrawPlayer;
begin
glPushmatrix;
 gltranslatef(rotx,-8,-15 );
 glBegin(GL_TRIANGLES);
  glColor3f(1, 0, 0); glVertex3f(-0.6,-0.6, 0);
  glColor3f(0, 0, 1); glVertex3f( 0.6,-0.6, 0);
  glColor3f(0, 1, 0); glVertex3f( 0, 0.6, 0);
 glEnd;
glPopmatrix;
end;
 
Procedure TGeschoss.Draw;
begin
glpushmatrix;
 glTranslatef(posx, posy, -15);
 glBegin(GL_TRIANGLES);
  glColor3f(1, 0, 0); glVertex3f(-0.2,-0.2, 0);
  glColor3f(1, 0, 0); glVertex3f( 0.2,-0.2, 0);
  glColor3f(1, 0, 0); glVertex3f( 0, 0.2, 0);
 glEnd;
 glpopmatrix;
end;
 
procedure Tform1.Background;
var
  tex : PSDL_Surface;
begin
  tex := IMG_Load('bg.JPG');
  if assigned(tex) then
  begin     
    glGenTextures(1, @TexID);
    glBindTexture(GL_TEXTURE_2D, TexID);
    glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
    glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
    glTexImage2D(GL_TEXTURE_2D, 0, 3, tex^.w, tex^.h,0, GL_RGB, GL_UNSIGNED_BYTE, tex^.pixels);
    SDL_FreeSurface(tex);
  end;
end;
end.
 

Zuletzt geändert von Jerk am Sa Dez 29, 2007 19:25, insgesamt 1-mal geändert.

Nach oben

Lord Horazont

Betreff des Beitrags:

Verfasst: Sa Dez 29, 2007 19:22

DGL Member

Registriert: Do Sep 02, 2004 19:42
Beiträge: 4158
Programmiersprache: FreePascal, C++

Wenn ich das richtig sehe, solltest du vorher die Textureinheit wieder ausschalten, also glDisable(GL_TEXTURE_2D) aufrufen. Am besten machst du das nachdem du dein Quad mit der Textur gerendert hast.

Und benutz anstatt Code- doch bitte Pascal-Tags :wink:

Gruß Lord Horazont

_________________
If you find any deadlinks, please send me a notification – Wenn du tote Links findest, sende mir eine Benachrichtigung.
current projects: ManiacLab; aioxmpp
zombofant network • my photostream
„Writing code is like writing poetry“ - source unknown

„Give a man a fish, and you feed him for a day. Teach a man to fish and you feed him for a lifetime. “ ~ A Chinese Proverb

Nach oben

Jerk

Betreff des Beitrags:

Verfasst: Sa Dez 29, 2007 19:27

DGL Member

Registriert: Fr Dez 28, 2007 20:24
Beiträge: 62
Wohnort: Berlin

Vielen Dank!

Nach oben

Lossy eX

Betreff des Beitrags:

Verfasst: Sa Dez 29, 2007 20:29

DGL Member

Registriert: Do Dez 05, 2002 10:35
Beiträge: 4234
Wohnort: Dortmund

Um evtl noch etwas weiter ins Detail zu gehen. OpenGL ist eine Statemaschine und wenn du etwas aktiviert hast dann bleibt es aktiv bis es wieder explizit aus gemacht wird. Und damit wird in deinem Falle die Farbe des Texels, welches als letztes gesetzt war (Textur und Koordinate), auf alle anderen Primitive angewendet. Ist im übrigen bei allem so. Also Licht, Shader, etc...

Nach oben

Jerk

Betreff des Beitrags:

Verfasst: Sa Dez 29, 2007 20:39

DGL Member

Registriert: Fr Dez 28, 2007 20:24
Beiträge: 62
Wohnort: Berlin

Was ich noch nicht ganz verstehe, ist weler Wert von Translate3f(x,y,z); jeweils den Rand des Formulars darstellt.

Zuletzt geändert von Jerk am Sa Dez 29, 2007 20:44, insgesamt 1-mal geändert.

Nach oben

Lossy eX

Betreff des Beitrags:

Verfasst: Sa Dez 29, 2007 20:43

DGL Member

Registriert: Do Dez 05, 2002 10:35
Beiträge: 4234
Wohnort: Dortmund

In der Pespektive ist das leider nicht ganz so einfach zu sagen. Das müsste man berechnen, da die Breite sich natürlich auch in Anhängigkeit der Tiefe verändert. Wenn es allerdings um 2D Darstellung geht solltest du dir mal glOrtho anschauen. Damit kannst du die Einheiten so einstellen, dass es sich wie in der GDI verhält.

Nach oben

Jerk

Betreff des Beitrags:

Verfasst: So Dez 30, 2007 16:36

DGL Member

Registriert: Fr Dez 28, 2007 20:24
Beiträge: 62
Wohnort: Berlin

Noch eine Frage, was muss ich tun, damit ich auf einem anderen Rechner mit meinm Programm folgende Probleme nicht mehr habe:

- sdl.dll fehlt
- sdl_image.dll fehlt
- Texturen werden nicht angezeigt

Kopieren der dlls lässt das prog zwar starten jedoch werden die Texturen trotzdem nicht angezeigt.

Nach oben

Lossy eX

Betreff des Beitrags:

Verfasst: So Dez 30, 2007 18:31

DGL Member

Registriert: Do Dez 05, 2002 10:35
Beiträge: 4234
Wohnort: Dortmund

Ja du musst dann natürlich die DLLs mit ausliefern.

Zu den Texturen: Du lädst diese mit dem Namen 'bg.JPG'. Das gibt an, dass das System die Datei in dem aktuellen Verzeichnis sucht. Das muss aber nicht das Verzeichnis sein in dem sich auch die Texturen befinden. Also solltest du vor jeder Datei immer das aktuelle Verzeichnis der EXE anhängen. Weiß nicht ob so auch der Backslash am Ende vorhanden ist.

Code:

ExtractFilePath(ParamStr(0))

Außerdem sollte die Größe der Texturen immer eine Potenz von 2 haben. Denn nicht jede Grafikkarte kommt damit klar, wenn das anders ist. Dann erscheint die Textur einfach weiß oder es wird richtig langsam. Deswegen solltest du auch, wenn du deine Anwendung veröffentlichen willst, die OpenGL Fehler abfragen und in einer Logdatei festhalten. Denn das vereinfacht die Fehlersuche etc. Fehlercodes natürlich nur mit einer Angabe einer nachvollziehbaren Codestelle. Ansonsten bringt die Info nichts.

Zitat:

Code:

tex := IMG_Load('bg.JPG');
if assigned(tex) then begin
  ...
end;

Und so etwas ist auch potentiell riskant. Denn wenn die Datei nicht geladen werden konnte, dann geht es sang und klanglos unter. Sollte ein Fehler beim Laden auftreten wird also niemand etwas davon mitbekommen. Nur weil kein Fehler direkt erkennbar ist heißt es nicht, dass auch kein Fehler passiert ist.

Nach oben

Lord Horazont

Betreff des Beitrags:

Verfasst: So Dez 30, 2007 18:56

DGL Member

Registriert: Do Sep 02, 2004 19:42
Beiträge: 4158
Programmiersprache: FreePascal, C++

Lossy eX hat geschrieben:

Zu den Texturen: Du lädst diese mit dem Namen 'bg.JPG'. Das gibt an, dass das System die Datei in dem aktuellen Verzeichnis sucht. Das muss aber nicht das Verzeichnis sein in dem sich auch die Texturen befinden. Also solltest du vor jeder Datei immer das aktuelle Verzeichnis der EXE anhängen. Weiß nicht ob so auch der Backslash am Ende vorhanden ist.

Code:

ExtractFilePath(ParamStr(0))

Ich regle das immer so, dass ich eine globale AppPath-Variable habe, die dann genau den Wert enthält. Backslash wird kostenlos mitgeliefert, wenn man ExtractFilePath nimmt.

Gruß Lord Horazont

Nach oben

Lossy eX

Betreff des Beitrags:

Verfasst: So Dez 30, 2007 20:03

DGL Member

Registriert: Do Dez 05, 2002 10:35
Beiträge: 4234
Wohnort: Dortmund

"AppPath-Variable"? Wo kann man die denn finden?

Nach oben

Lord Horazont

Betreff des Beitrags:

Verfasst: So Dez 30, 2007 20:06

DGL Member

Registriert: Do Sep 02, 2004 19:42
Beiträge: 4158
Programmiersprache: FreePascal, C++

Ich meinte, dass ich mir diese Global anlege, die existiert nicht in irgendeiner mitgelieferten Unit (obwohls zumindest für FPC mal ne Idee wäre), sodass ich nicht immer ExtractFilePath(...) schreiben muss. Das bringt natürlich auch ein wenig performance, wenn nicht immer der Pfad neu berechnet wird.

Gruß Lord Horazont

Nach oben

Jerk

Betreff des Beitrags:

Verfasst: Mo Dez 31, 2007 18:11

DGL Member

Registriert: Fr Dez 28, 2007 20:24
Beiträge: 62
Wohnort: Berlin

Die Datei bg.jpg ist im Verzeichnis vorhanden aber sie wird einfach auf anderen Rechnern nicht im Programm angezeigt, auf meinem Rechner kein Problem, selbst aus der zipdatei raus ohne extrahieren.

Nach oben

Lord Horazont

Betreff des Beitrags:

Verfasst: Mo Dez 31, 2007 18:49

DGL Member

Registriert: Do Sep 02, 2004 19:42
Beiträge: 4158
Programmiersprache: FreePascal, C++

Dann beachte den Hinweis von Lossy, dass die Textur auf höhe und breite eine Potenz von Zwei haben sollte, also 8, 16, 32, 64, 128, 256 oder sowas.
Wie äußert sich das nicht-anzeigen? Werden die Objekte schwarz oder weiss?
Weiss hieße, dass die Textur nicht geladen wird, bei schwarz liegt der Fehler irgendwo anders.

Gruß Lord Horazont

Nach oben

Jerk

Betreff des Beitrags:

Verfasst: Di Jan 01, 2008 12:42

DGL Member

Registriert: Fr Dez 28, 2007 20:24
Beiträge: 62
Wohnort: Berlin

Frohes neues..
- Wird weiss und ja es ist eine power of 2 graphic.

Nach oben

Lord Horazont

Betreff des Beitrags:

Verfasst: Di Jan 01, 2008 12:44

DGL Member

Registriert: Do Sep 02, 2004 19:42
Beiträge: 4158
Programmiersprache: FreePascal, C++

Frohes Neues zurück, auch an alle anderen hier.

Hm, hast du mal eine Fehlermeldung ausgeben lassen, wenn Assigned(Tex) false zurückgibt?

Gruß Lord Horazont

Nach oben

Seite 1 von 1

[ 15 Beiträge ]

Foren-Übersicht » Programmierung » Einsteiger-Fragen

Wer ist online?

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