Source position: bgrawritepng.pas line 34
type TGetPixelFunc = function(
x: LongWord;
y: LongWord
):TColorData of object;