Function for getting pixel colors.

function GetPixel32(const Image: TImageData; 
                    X: LongInt; 
                    Y: LongInt): TColor32Rec;

Imaging (at line 243)

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