![]() |
(SST) ShlWAPI.pas Version 1.08 |
---|---|
Developer Reference |
Returns the red, green, and blue values corresponding to the specified color's hue, luminance, and saturation. |
Scope |
---|
Global (i.e. this function can be called/accessed from code in any unit that includes/uses (SST)ShlWAPI.pas). |
Syntax | |
---|---|
function ColorHLSToRGB(wHue : WORD; wLuminance : WORD; wSaturation : WORD) : COLORREF; |
Parameters | |
---|---|
wHue [in] | A 16 bit, word value defining the hue of the color for which to return the red, green, and blue (RGB) values. |
wLuminance [in] | A 16 bit, word value defining the Luminance of the color for which to return the red, green, and blue (RGB) values. |
wSaturation [in] | A 16 bit, word value defining the saturation of the color for which to return the red, green, and blue (RGB) values. |
Return Values |
---|
Returns a COLORREF value which contains the red, green, and blue values corresponding to the hue, luminance, and saturation (HLS) input values. |
Example |
---|
PROCEDURE TForm4.TestShlWAPIColorHLSToRGB(Sender : TObject); VAR hue : WORD; //the H of the HLS VAR luminance : WORD; //the L of the HLS VAR saturation : WORD; //the S of the HLS VAR rgbcolor : COLORREF; VAR alpha : BYTE; VAR red : BYTE; VAR green : BYTE; VAR blue : BYTE; VAR newinfoline : STRING; BEGIN hue := 0; luminance := 0; saturation := 0; rgbcolor := 0; alpha := 0; red := 0; green := 0; blue := 0; newinfoline := ''; hue := 221; luminance := 88; saturation := 54; rgbcolor := ColorHLSToRGB(hue, luminance, saturation); newinfoline := 'ColorHLSToRGB called with a hue (H) value of 0x' + IntToHex(hue, 4) + ' (' + IntToStr(hue) + '), ' + 'luminance (L) of 0x' + IntToHex(luminance, 4) + ' (' + IntToStr(luminance) + '), ' + 'saturation (S) of 0x' + IntToHex(saturation, 4) + ' (' + IntToStr(saturation) + '), '; Memo1.Lines.Add(newinfoline); alpha := HIBYTE(HIWORD(rgbcolor)); red := LOBYTE(HIWORD(rgbcolor)); green := HIBYTE(LOWORD(rgbcolor)); blue := LOBYTE(LOWORD(rgbcolor)); newinfoline := 'returned a red (R), green (G), blue (B) value of : 0x' + IntToHex(rgbcolor, 8) + ' (' + IntToStr(red) + ', ' + IntToStr(green) + ', ' + IntToStr(blue) + ')'; Memo1.Lines.Add(newinfoline); Memo1.Lines.Add(''); END; |
The above example will produce the following output: |
ColorHLSToRGB called with a hue (H) value of 0x00DD (221), luminance (L) of 0x0058 (88), saturation (S) of 0x0036 (54), returned a red (R), green (G), blue (B) value of : 0x005C4873 (92, 72, 115) |
Requirements | |
---|---|
Unit: | Declared and imported in (SST)ShlWAPI.pas |
Library: | (SST)ShlWAPI.dcu/(SST)ShlWAPI.obj |
Unicode: | Not applicable. |
Min. ShlWAPI.dll version according to MS SDK doc.: | 5.0 |
Min. ShlWAPI.dll version based on SST research: | 5.0 |
Min. OS version(s) according to Microsoft SDK doc.: | Windows 2000, Windows NT 4.0 with Internet Explorer 5, Windows 98, Windows 95 with Internet Explorer 5 |
Min. OS version(s) according to SST research.: | Windows NT 4.0 with IE 5, Windows 95 with IE 5, Windows 98 with IE 5, Windows 98 SE,Windows 2000 and later |
See Also |
---|
ColorAdjustLuma, ColorRGBToHLS, SHCreateShellPalette, SHGetInverseCMAP |
Windows APIs: ColorAdjustLuma, ColorHLSToRGB, ColorRGBToHLS, SHCreateShellPalette, SHGetInverseCMAP, |
Document/Contents version 1.00 Page/URI last updated on 07.12.2023 |
Copyright © Stoelzel Software Technologie (SST) 2010 - 2017 |
Suggestions and comments mail to: webmaster@stoelzelsoftwaretech.com |