OpenGL Bitmap für Texttur schnell im Speicher erzeugen

[luisk]

Die Sache mit dem Laden von der Platte ist mittlerweile schon erledigt.

Jetzt geht es nur noch um die Geschwindigkeit.

Scanline[] ist seltsamer Weise langsamer als bmp.canvas.pixels[lx,ly] :?:

Gibt es evtl. einen Turbo über Win API?

[luisk]

jetzt läuft

Delphi-Quellcode:

 l_ptr:=bmp.ScanLine[y];

schneller
Grund:

Delphi-Quellcode:

dc := GetDC(0);
:
:
ReleaseDC(0, dc);

seltsam :cyclops::cyclops::cyclops:

Delphi-Quellcode:

  inc(z);
    bmp.canvas.Textout(20,20,inttostr(z));
    dc := GetDC(0);
    xwidth := bmp.Width;
    yHeight := bmp.Height;
    for y := 0 to yHeight-1 do begin
         l_ptr:=bmp.ScanLine[y];
        for x := 0 to xwidth-1 do begin
           l_r:=  l_ptr.rgbBlue;
           l_ptr.rgbBlue:=l_ptr.rgbRed;
           l_ptr.rgbRed:=l_r;
           texdata[((yHeight-1)-y)*xwidth+x] := l_ptr^;
           inc(l_ptr);
       end;
    end;
    ReleaseDC(0, dc);