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