Returns index of color in palette or index of nearest color if exact match is not found.

function FindColor(Pal: PPalette32; 
                   Entries: LongInt; 
                   Color: TColor32): LongInt;

Imaging (at line 268)

Pal must have at least Entries color entries.