BMP-Texture-LOADER [verDREHT]

[Bunny99s]

Hi, ich wollte nur Anmerken dass sich in deiner function CreateTexture sich ein Fehler eingeschlichen hat:

Deine Function geht, solange man keine RGBA Texturen erstellen möchte.
Denn du hast bei components nicht 4 sondern GL_RGBA (=$1908) angegeben
was die function sicherlich nicht dazu bringt das zu tun was sie soll.

Delphi-Quellcode:

if Format = GL_RGBA
  then gluBuild2DMipmaps(GL_TEXTURE_2D, 4, Width, Height, GL_RGBA, GL_UNSIGNED_BYTE, pData)
  else gluBuild2DMipmaps(GL_TEXTURE_2D, 3, Width, Height, GL_RGB, GL_UNSIGNED_BYTE, pData);

statt

Delphi-Quellcode:

if Format = GL_RGBA
  then gluBuild2DMipmaps(GL_TEXTURE_2D, GL_RGBA, Width, Height, GL_RGBA, GL_UNSIGNED_BYTE, pData)
  else gluBuild2DMipmaps(GL_TEXTURE_2D, 3, Width, Height, GL_RGB, GL_UNSIGNED_BYTE, pData);

greez Bunny99s