From 669392448a38034e96a92fa3c8063b41d3ecae55 Mon Sep 17 00:00:00 2001 From: Bergmann89 Date: Tue, 22 Oct 2013 17:28:34 +0200 Subject: [PATCH] * fixed bug: buffer overflow when exporting TGA files --- glBitmap.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/glBitmap.pas b/glBitmap.pas index 1198bda..0641898 100644 --- a/glBitmap.pas +++ b/glBitmap.pas @@ -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; -- 2.1.4