Thema: Delphi [OpenGL] Transparenz

Einzelnen Beitrag anzeigen

Flips

Registriert seit: 17. Feb 2005
Ort: Sankt Wendel
491 Beiträge
 
Delphi 7 Professional
 
#15

Re: [OpenGL] Transparenz

  Alt 5. Sep 2007, 17:19
Übrigends, ich mache es jetzt bei der neuen Engine so
Delphi-Quellcode:
//Texture wird vorher gebunden
glDisable(GL_DEPTH_TEST);
glEnable(GL_BLEND);
glBlendFunc(GL_SRC_ALPHA,GL_ONE);
//Render...
glDisable(GL_BLEND);
glEnable(GL_DEPTH_TEST);
Und ich nutze bei der neuen Version auch die Textures.pas (1.03), wobei ich meinem Vorredner recht geben muss. Also laut dieser Page kann die kein PNG, was auch aus dem Code hervorgeht
Delphi-Quellcode:
function LoadTexture(Filename: String; var Texture : GLuint; LoadFromRes : Boolean) : Boolean;
begin
  if copy(Uppercase(filename), length(filename)-3, 4) = '.BMPthen
    LoadBMPTexture(Filename, Texture, LoadFromRes);
  if copy(Uppercase(filename), length(filename)-3, 4) = '.JPGthen
    LoadJPGTexture(Filename, Texture, LoadFromRes);
  if copy(Uppercase(filename), length(filename)-3, 4) = '.TGAthen
    LoadTGATexture(Filename, Texture, LoadFromRes);
end;
Aber gibt ja viele Mods davon...
Philipp F.
  Mit Zitat antworten Zitat