Source position: graphutil.pp line 79
procedure ColorRGBToHLS(
clrRGB: COLORREF;
var Hue: Word;
var Luminance: Word;
var Saturation: Word
);