Parcourir la source

* fixed bug: buffer overflow when exporting TGA files

master
Bergmann89 il y a 12 ans
Parent
révision
669392448a
1 fichiers modifiés avec 1 ajouts et 1 suppressions
  1. +1
    -1
      glBitmap.pas

+ 1
- 1
glBitmap.pas Voir le fichier

@@ -4630,7 +4630,7 @@ var
begin
PixelSize := fPixelSize;

for Idx := 0 to Height * Width do begin
for Idx := 1 to Height * Width do begin
Temp := pByteArray(pTemp)^[2];
pByteArray(pTemp)^[2] := pByteArray(pTemp)^[0];
pByteArray(pTemp)^[0] := Temp;


Chargement…
Annuler
Enregistrer