TImageRenderer.RenderProc

procedure RenderProc(x1, x2, y: integer; alpha: PByte); override;