TIEBitmap.OnRenderVirtualPixel
TIEBitmap.OnRenderVirtualPixel
Declaration
property OnRenderVirtualPixel: TIERenderVirtualPixel;
Description
Occurs whenever a pixel must be rendered if
PixelFormat is ieVirtual.
Applications should set OnRenderVirtualPixel after
PixelFormat = ieVirtual.
ImageEnView1.IEBitmap.OnRenderVirtualPixel := DrawVirtualPixel;
ImageEnView1.Update();
...
procedure TForm1.DrawVirtualPixel(Sender: TObject; SrcX, SrcY: integer; var outval: TRGB);
begin
outval := CreateRGB(SrcX mod 255, SrcY mod 255, 255);
end;