How to get HLS Values from TColorDialog before close

  api, delphi, vcl, windows

i know About ColorRGBToHLS and ColorHLSToRGB use Vcl.GraphUtil but if the selected color is Chromatic Color like clWhite or clBlack how do i get Original HLS Values from TColorDialog?
enter image description here

i have this code:

procedure TFrmMain.ColorDialog1Close(Sender: TObject);
begin
  Panel1.Color := ColorDialog1.Color;
end;

Source: Windows Questions

LEAVE A COMMENT