Files |  Tutorials |  Articles |  Links |  Home |  Team |  Forum |  Wiki |  Impressum

Aktuelle Zeit: Mi Jul 16, 2025 06:21

Foren-Übersicht » Programmierung » Einsteiger-Fragen 		Unbeantwortete Themen | Aktive Themen


Ein neues Thema erstellen Auf das Thema antworten  Seite 1 von 1
  [ 8 Beiträge ] 
  Vorheriges Thema | Nächstes Thema 
Autor Nachricht
Gaukler
 Betreff des Beitrags: Textur Problem
BeitragVerfasst: Di Jan 03, 2006 00:08 
Offline
DGL Member

Registriert: Sa Okt 22, 2005 20:24
Beiträge: 291
Wohnort: Frauenfeld/CH
hallo

ich habe ein problem mit dem Texturenladen oder auch Binden, ich habe jetzt schon sicher 5h an dem herumgerätselt aber OpenGL bleibt irgendwie stur ;)

soviel ich weiss lädt er die textur, denn im ram wird speicher beansprucht. Ausserdem zeigt er eine kugel, auf der eine textur sein sollte, ganz normal an, einfach ohne Textur.

das laden sieht so aus:

Code:
  1.   glenable(GL_TEXTURE_2D);
  2.   glGenTextures(2,@TexNrArray);
  3.   CreateImageBMP('Zwinger256.bmp',Breite,Hoehe,PBitmap);  // verweist auf unten stehende prozedur
  4.   glBindTexture(GL_TEXTURE_2D,TexNrArray[1]);
  5.   glTexImage2D(GL_TEXTURE_2D,0,GL_RGB,Breite,Hoehe,0,
  6.                GL_RGB,GL_UNSIGNED_BYTE,PBitmap);
  7.   glTexParameterf(GL_TEXTURE_2D,GL_TEXTURE_MAG_FILTER,GL_NEAREST);
  8.   glTexParameterf(GL_TEXTURE_2D,GL_TEXTURE_MIN_FILTER,GL_NEAREST);
  9.   glTexEnvf(GL_TEXTURE_ENV,GL_TEXTURE_ENV_MODE,GL_REPLACE);
  10.   gluBuild2DMipmaps(GL_TEXTURE_2D,GL_RGB,Breite,Hoehe,GL_RGB,GL_UNSIGNED_BYTE,PBitmap);
  11.  
  12. //für das laden zuständig:
  13. procedure CreateImageBMP(BitmapName: string;
  14.                          var ImageWidth,ImageHeight: GLint; var PBMP: pointer);
  15.   type TRGBRec= record R,G,B: byte end;
  16.   var  i:       integer;
  17.        a:       byte;
  18.        BMPStream: TMemoryStream;
  19.        DC:     THandle;
  20.        Bitmap: TBitmap;
  21. begin
  22.   Bitmap:=TBitmap.Create;
  23.   Bitmap.LoadFromFile(BitmapName);
  24.   DC:=GetDC(0);
  25.   BMPStream:=TMemoryStream.Create;
  26.   with Bitmap do BMPStream.SetSize(SizeOf(TBitMapInfoHeader)+Height*Width*3);
  27.   with TBitMapInfoHeader(BMPStream.Memory^) do
  28.   begin
  29.     biSize:=SizeOf(TBitMapInfoHeader);
  30.     biWidth:=Bitmap.Width;
  31.     biHeight:=Bitmap.Height;
  32.     biPlanes:=1;
  33.     biBitCount:=24;
  34.     biCompression:=BI_RGB;
  35.     biSizeImage:=0;
  36.     biXPelsPerMeter:=0;//10000;
  37.     biYPelsPerMeter:=0;//10000;
  38.     biClrUsed:=0;
  39.     biClrImportant:=0;
  40.     ImageWidth:=biWidth;
  41.     ImageHeight:=biHeight;
  42.   end;
  43.   PBMP:=Pointer(longint(BMPStream.Memory)+SizeOf(TBitmapInfoHeader));
  44.   GetDIBits(DC,Bitmap.Handle,0,Bitmap.Height, PBMP,
  45.             TBitMapInfo(BMPStream.Memory^),DIB_RGB_COLORS);
  46.   for i:=0 to ImageWidth*ImageHeight-1 do
  47.   with TRGBRec(Pointer(longint(PBMP)+i*3)^) do
  48.   begin a:=R; R:=B; B:=a; end;
  49.   Bitmap.Free;
  50. end {CreateImageBMP};



soviel zur ladefunktion.

dann wird in einer objekt prozedur die textur auf eine kugel "projeziert":


Code:
  1.        Quadric:=gluNewQuadric;
  2.        gluQuadricDrawStyle(Quadric,GLU_FILL);
  3.        gluQuadricTexture(Quadric, GL_TRUE);
  4.        glEnable(GL_TEXTURE_2D);
  5.        glMatrixMode(GL_TEXTURE);
  6.        glLoadIdentity;
  7.        glBindTexture(GL_TEXTURE_2D,TexNrArray[1]);
  8.        glScalef(1,1,0);
  9.        glMatrixMode(GL_MODELVIEW);
  10.        gluSphere(Quadric,3,50,50);
  11.  


ich weiss überhaupt nicht woran es liegt das dies nicht funktioniert, habe schon einige programme angeschaut in denen prozeduren geladen werden und in denen wirds immer irgendwie ähnlich bis fast gleich gemacht.
ich hoffe auf eine baldige antwort
wie gesagt, er stellt die kugel ganz normal dar, wenn ihr wollt, kann ich auch noch die lighting, createprozeduren usw hier abliefern...
mfg gaukler

_________________
bester uo-shard: www.uosigena.de
Nach oben
 Profil  
Mit Zitat antworten  
Flash
 Betreff des Beitrags:
BeitragVerfasst: Di Jan 03, 2006 03:29 
Offline
Guitar Hero
Benutzeravatar

Registriert: Do Sep 25, 2003 15:56
Beiträge: 7810
Wohnort: Sachsen - ERZ / C
Programmiersprache: Java (, Pascal)
Hat deine Textur eine größe die eine Potenz von 2 ist? Also z.B. 256x512?

_________________
Blog: kevin-fleischer.de und fbaingermany.com
Nach oben
 Profil  
Mit Zitat antworten  
dj3hut1
 Betreff des Beitrags:
BeitragVerfasst: Di Jan 03, 2006 07:59 
Offline
DGL Member
Benutzeravatar

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

Was ich merkwürdig finde ist das du

Code:
  1.  
  2. glTexImage2D(GL_TEXTURE_2D,0,GL_RGB,Breite,Hoehe,0,
  3. GL_RGB,GL_UNSIGNED_BYTE,PBitmap);
  4.  


und gleichzeitig auch

Code:
  1.  
  2. gluBuild2DMipmaps(GL_TEXTURE_2D,GL_RGB,Breite,Hoehe,GL_RGB,GL_UNSIGNED_BYTE,PBitmap);
  3.  


für dein Texturobjekt aufrufst. :?:
Zumindest glTexImage2D wäre meiner Meinung nach dann überflüssig...



Viele Grüße
dj3hut1
//edit: Bei BB-Code eckige Klammern und kein HTML ;-) (phobeus)
Nach oben
 Profil  
Mit Zitat antworten  
Lossy eX
 Betreff des Beitrags:
BeitragVerfasst: Di Jan 03, 2006 10:13 
Offline
DGL Member
Benutzeravatar

Registriert: Do Dez 05, 2002 10:35
Beiträge: 4234
Wohnort: Dortmund
Das hat dj3hut1 schon gut erkannt. Das glTexImage ist ein bisschen überflüssig. Wobei ich persönlich mittlerweile die gluBuildMipMaps nur noch in Extremsituationen benutzen würde. Mip maps kann man seit OpenGL 1.4 von seiner Grafikkarte erzeugen lassen. Was wesentlich schneller ist. Und mir fällt gerade auf, dass du durch deine Filterung die MipMaps auch gar nicht aktiviert hast.

Aber noch ein Wort in Ehren. Die Methode CreateImageBMP solltest du auf jeden Fall so schnell wie möglich ändern! Ich persönlich halte es für gefährlich einen Speicherbereich zu erstellen und desen Pointer als var parameter oder über result zurückgeben zu lassen. Aber wenn man sich an gewisse Dinge hält mag das noch gehen. Was bei dir aber richtig schlimm ist ist die Tatsache, dass der Speicherbereich nicht mal manuell erstellt wurden ist sondern von einem TMemoryStream stammt. TMemoryStream ist nur eine Kappselung eines Speicherbereichs damit es als TStream benutzt werden kann. Was für Texturen aber absolut nicht notwendig ist. Und dann belässt du den Stream auch einfach im Speicher. Bei einer 512x512 x RGBA Textur entsteht so ein Speicherloch von mal eben 1 MB. Da die Textur dann aber eigentlich bereits auf der Grafikkarte ist wäre das absolut verschwänderisch und äußerst unsauber. Ich hoffe du hast verstanden worauf ich hinaus möchte. ;-)

Zusätzlich kommt noch hinzu, dass glTexImage normalerweise nur die Pixeldaten bekommen möchte. Und dabei benötigst du keinen Header mehr. Zusätzlich finde ich den Weg mit dem DC des Desktops ziemlich extrem, wenn man bedenkt, dass ein TBitmap einem einen direkten Zugriff auf dessen Speicher ermöglicht. Dann dein TRGBRec. Diese dürfte mitunter 4 oder 8 Bytes groß sein. Je nachdem was in deinem delphi eingestellt ist. Du solltest dabei packed als zusatz angeben. Aber da du den Pointer eh umständlich berechnest könntest du damit sogar noch glück haben. Wobei das aber wieder ein wenig überflüssig wäre. Die Grafikkarten kennen ab OpenGL 1.2 (das konnte sogar meine uralte TNT 2) auch BGR Texturen. Also genau das was in einem BMP gespeichert ist.

Hat es eigentlich einen Grund warum du mit glGenTextures 2 Texturen erstellst?

Zum Testen ob deine Textur funktioniert würde ich dir im ürbigen auch ein Quad empfehlen, da du so sehr gut sehen kannst ob sie auch genau so ist wie sie sein sollte.

Da ich auch mehr als meckern kann hier mal ein Stück Code aus meiner glBitmap. Sehr stark verändert. Ich lade mittlerweile (noch nicht veröffentlicht) aus einem Bitmap 5 verschiede Formate. :-D
Auf die Codes gibt es keine Garantie, da ich sie hier im Editfeld des Forums zusammengefummelt habe.

Bitmap in Speicher laden
Code:
  1.  
  2. var
  3.   pSource, pData, pTempData: PByte;
  4.   Row, RowSize, TempWidth, TempHeight: Integer;
  5. begin
  6.   TempWidth := Bitmap.Width;
  7.   TempHeight := Bitmap.Height;
  8.  
  9.   RowSize := TempWidth * 3;
  10.  
  11.   GetMem(pData, TempHeight * RowSize);
  12.  
  13.   // Kopieren, da der Pointer verändert wird.
  14.   pTempData := pData;
  15.      
  16.   // Zeile für zeile
  17.   for Row := 0 to TempHeight -1 do begin
  18.     pSource := Bitmap.Scanline[Row];
  19.  
  20.     // ganze Zeile kopieren
  21.     if (Assigned(pSource)) then begin
  22.       Move(pSource^, pTempData^, RowSize);
  23.       Inc(pTempData, RowSize);
  24.     end;
  25.   end;


Textur erstellen
Code:
  1. var
  2.   InternalFormat: Cardinal;
  3.   Pix: PRGBTripple;
  4.   Temp: Byte;
  5.   Idx: Integer;
  6. begin
  7.   glGenTextures(1, @ID);
  8.   glBindTexture(GL_TEXTURE_2D, ID);
  9.   glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR_MIPMAP_LINEAR);
  10.   glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
  11.  
  12.   // Wird BGR unterstützt
  13.   if (GL_VERSION_1_2 or GL_BGRA) then begin
  14.     InternalFormat := GL_BGR;
  15.   end else begin
  16.     InternalFormat := GL_RGB;
  17.  
  18.     // Bytes vertauschen
  19.     Pix := pData;
  20.     for Idx := 0 to Width * Height -1 do begin
  21.       Temp := Pix^.rgbtRed;
  22.       Pix^.rgbtRed := Pix^.rgbtBlue;
  23.       Pix^.rgbtBlue := Temp;
  24.       inc(Pix);
  25.     end;
  26.   end;
  27.  
  28.   if (GL_VERSION_1_4 or GL_SGIS_generate_mipmap) then begin
  29.     glTexParameteri(GL_TEXTURE_2D, GL_GENERATE_MIPMAP, GL_TRUE);
  30.     glTexImage2D(GL_TEXTURE_2D, 0, InternalFormat, Width, Height, 0, GL_RGB, GL_UNSIGNED_BYTE, pData);
  31.   end
  32.     else gluBuild2DMipmaps(Target, GL_RGB, Width, Height, InternalFormat, GL_UNSIGNED_BYTE, pData);
  33. end;


Wenn die Texturdaten (nicht die Textur) nicht mehr benötigt wird muss der Speicher wieder freigegeben werden.
Code:
  1.   FreeMem(pData);


PS: Meine Güte ist das viel geworden. :shock:
Nach oben
 Profil  
Mit Zitat antworten  
Gaukler
 Betreff des Beitrags:
BeitragVerfasst: Di Jan 03, 2006 22:58 
Offline
DGL Member

Registriert: Sa Okt 22, 2005 20:24
Beiträge: 291
Wohnort: Frauenfeld/CH
könnte es evtl auch sein, das es da dran liegt, das ich nach jedem texturenladen wieder ein neuer createrenderingcontext mache usw dann damit irgendwie die texturen lösche?

Weil ich rufe jedes mal beim ändern vom objekten das ganze eigentlich neu auf.


ich weiss das es schlecht programmiert ist, aber für 2 texturen sollte es vorerst reichen, wollte damit mal n bisschen rumspielen, nur dumm war das ich keine textur auf den bildschirm brachte...

_________________
bester uo-shard: www.uosigena.de
Nach oben
 Profil  
Mit Zitat antworten  
Lossy eX
 Betreff des Beitrags:
BeitragVerfasst: Mi Jan 04, 2006 08:25 
Offline
DGL Member
Benutzeravatar

Registriert: Do Dez 05, 2002 10:35
Beiträge: 4234
Wohnort: Dortmund
Hmmm. Das könnte es natürlich auch noch sein. Wobei du die Texturen nicht löscht. Die existieren dann so bis du den Kontext löscht. Wenn du aber nur einen Neuen erstellst, dann kennt er die Texturen. Der andere aber schon. Und somit würdest du wohl so etwas von massig an Speicher auf der Grafikkarte verbraten. Mal ganz zu schweigen von dem Bildschirmbuffern. Die ja dann auch noch existieren.

Also du solltest in jedem Fall nur ein mal einen Kontext erzeugen. Außer du veränderst das Fenster so sehr, dass es nicht mehr gültig ist und du einen neuen Kontext erstellen musst.
Nach oben
 Profil  
Mit Zitat antworten  
Flash
 Betreff des Beitrags:
BeitragVerfasst: Mi Jan 04, 2006 15:08 
Offline
Guitar Hero
Benutzeravatar

Registriert: Do Sep 25, 2003 15:56
Beiträge: 7810
Wohnort: Sachsen - ERZ / C
Programmiersprache: Java (, Pascal)
Am allereinfachsten Texturen lädt man so:

1. Man nimmt sich das 1.5er Template von der Seite hier oder baut sich eins wie's im Quickstart beschrieben ist.
2. Man lädt sich die glBitmap.pas oder besser gleich den ganzen DGLSDK runter (http://wiki.delphigl.com/index.php/DGLSDK)
3. Du baust dir eine Liste mit Instanzen der TglBitmap2D Klasse. Jede instanz für eine Textur.
4. Du rufst nur noch TexArray[n].bind auf und deine Textur ist geladen.

Also...grob. Aber mit der Texturunit bist du auf der sicheren seite.

_________________
Blog: kevin-fleischer.de und fbaingermany.com
Nach oben
 Profil  
Mit Zitat antworten  
Gaukler
 Betreff des Beitrags:
BeitragVerfasst: Mi Jan 04, 2006 19:38 
Offline
DGL Member

Registriert: Sa Okt 22, 2005 20:24
Beiträge: 291
Wohnort: Frauenfeld/CH
hab mal angefangen sdl zu proggen. das ist echt sehr gut gemacht und wenn ich ehrlich bin auch einfach wenn man mal die grundlagen kennt und ein gescheites template hat :D

und jetzt gehts auch endlich, kann mal was darstellen mit sdl *freu* waren ein paar stunden arbeit, aber ich denke es hat sich gelohnt!

_________________
bester uo-shard: www.uosigena.de
Nach oben
 Profil  
Mit Zitat antworten  
Beiträge der letzten Zeit anzeigen:  Sortiere nach  
Ein neues Thema erstellen Auf das Thema antworten  Seite 1 von 1
  [ 8 Beiträge ] 
Foren-Übersicht » Programmierung » Einsteiger-Fragen


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.

Suche nach:
Gehe zu:  
  Powered by phpBB® Forum Software © phpBB Group
Deutsche Übersetzung durch phpBB.de
[ Time : 0.009s | 14 Queries | GZIP : On ]