Function for getting pixel colors.

function GetPixelFP(const Image: TImageData; 
                    X: LongInt; 
                    Y: LongInt): TColorFPRec;

Imaging (at line 251)

Native pixel is read from Image and then translated to FP ARGB. Works for all image formats (except special) so it is not very fast.