Source position: fpreadpng.pp line 34
type TSetPixelProc = procedure(
x: Integer;
y: Integer;
CD: TColorData
) of object;