DGL • Thema anzeigen - Renderpass nutzen, um 2D Objekt auf Textur zu bringen

Renderpass nutzen, um 2D Objekt auf Textur zu bringen

Moderator: DGL-Team

Seite 1 von 1

[ 1 Beitrag ]

Vorheriges Thema | Nächstes Thema

Autor

Nachricht

ColaColin

Betreff des Beitrags: Renderpass nutzen, um 2D Objekt auf Textur zu bringen

Verfasst: Sa Okt 03, 2009 23:39

DGL Member

Registriert: Di Sep 29, 2009 14:04
Beiträge: 1

Ziel ist es, eine Art Bitmask zu erstellen. Hierzu rendere ich in einem Renderpass das fragliche Objekt auf eine Texture, die ich nun erstmal zum Testen als Bitmap abspeichere. Das klappt aber nur so halb. :roll:

Ich fürchte, ich mache irgendwas beim festlegen der Speicherbereich falsch... Damit hab ich kaum Erfahrung.

Hier das Problem in Bildern:

Bei 128*128 ist die Welt in Ordnung:
Bild

Bei 256*256 wird das Problem sichtbar:
Bild

Bei 512*512 wirds heftiger:
Bild

Und für 1024*1024 kann ich mir das Bild sparen, da bleibts schwarz...

Code:

 
type
  PixArray = Array[1..3] of byte;
var
  tmpTex: glUInt;
  pTexData: Pointer;
  mywidth, myheight: integer;
 
  ImgP: Pointer;
  tmpgluByte: PByte;
  tmpBitmap: TBitmap;
  p: ^PixArray;
  ty,tx: integer;
 
begin
  mywidth := round(self.Width);
  myHeight := round(self.Height);
 
  //Create a fitting Texture
  GetMem(PTexData,myWidth*myHeight*4);
 
  glGenTextures(1,@tmpTex);
  glBindTexture(GL_TEXTURE_2D, tmpTex);
  glTexImage2D(GL_TEXTURE_2D, 0, 4, myWidth,myHeight,0, GL_RGBA, GL_UNSIGNED_BYTE, PTexData);
  Dispose(PTexData);
 
  //Render the Object
  glClearColor(0.0, 0.0, 0.0, 0.0);
  glClear(GL_COLOR_BUFFER_BIT or GL_DEPTH_BUFFER_BIT);
 
  glMatrixMode(GL_PROJECTION);
  glLoadIdentity;
  glViewport(0,0,myWidth,myHeight);
  glOrtho(0,myWidth,0,myHeight,0,128);
 
  glMatrixMode(GL_MODELVIEW);
  glLoadIdentity;
 
  glTranslatef(0, 0, -5);
 
  if Texture = NIL then
    glBindTexture(GL_TEXTURE_2D,0)
  else
    Texture.Bind();  //Texturobjekt von glBitmap
 
 
//Diese Werte sind eigentlich für die Animationen zuständig, erstmal gefixt fürs testen...
    FTexLeft := 1;
    FTexBottom := 1;
    FTexTop := 0;
    FTexRight := 0;
 
    glBegin(GL_QUADS);
        glTexCoord2f(FTexLeft,FTexBottom); glVertex3f(0, 0, 0);  //left bottom
 
        glTexCoord2f(FTexRight,FTexBottom); glVertex3f(myWidth, 0, 0);  //right bottom
 
 
        glTexCoord2f(FTexRight,FTexTop); glVertex3f(myWidth, myHeight, 0);  //right top
 
 
        glTexCoord2f(FTexLeft,FTexTop); glVertex3f(0, myHeight, 0);  //left top
    glEnd;
 
  // copy to the texture
 
  glBindTexture(GL_TEXTURE_2D, tmpTex);
  glCopyTexImage2D(GL_TEXTURE_2D, 0, GL_RGBA, 0, 0, myWidth, myHeight, 0);
 
  GetMem(ImgP,myWidth*myHeight*4);
 
  glGetTexImage(GL_TEXTURE_2D, 0, GL_RGBA, GL_UNSIGNED_BYTE, imgP);
  tmpgluByte := imgP;
 
  tmpBitmap := TBitmap.Create;
  tmpBitmap.PixelFormat := pf24Bit;
  tmpBitmap.Height := myHeight;
  tmpBitmap.Width := myWidth;
 
 
//Oder mache ich nur beim ausgeben des Bildes einen Fehler ?!
  for ty := 0 to tmpBitmap.Height - 1 do
  begin
    p := tmpBitmap.ScanLine[ty];
    for tx := 0 to tmpBitmap.Width - 1 do
    begin
      p^[3] := tmpgluByte^;
      inc(tmpglUByte);
      p^[2] := tmpgluByte^;
      inc(tmpglUByte);
      p^[1] := tmpgluByte^;
      inc(tmpGluByte,2);  //Skip the AlphaChannel
      inc(p);
    end;
  end;
 
  tmpBitmap.SaveToFile('C:\Testbmp23232.bmp');
  tmpBitmap.Free;
 
  Dispose(ImgP);
end;
 

EDIT: Das Problem tritt ab 182*182 auf...

2ndEdit: Ich hab nach wie vor keine Ahnung was hier schieflief, aber mit einem FrambufferObject klappt das jetzt

Nach oben

Seite 1 von 1

[ 1 Beitrag ]

Foren-Übersicht » Programmierung » Einsteiger-Fragen

Wer ist online?

Mitglieder in diesem Forum: Bing [Bot] und 15 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.