ctm писал(а):менял я инкремент до следующего пикселя (4 вместо 3)
да. это исключительно моя ошибка. Даже для rgb изображений (без alpha канала), количество бит может быть 32, всё зависит от платформенной реализации.
Инкремент должен выглядеть так:
- Код: Выделить всё
var
bpp: Integer; // bytes per pixel
...
bpp:=fBackBuf.RawImage.Description.BitsPerPixel div 8;
...
inc(j,bpp);
ctm писал(а):и пришлось указать честный rect для текста - а то не выводил.
хм...