pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

mbColorLib: Introduce MaxHue, MaxSaturation and MaxLuminance as new properties of OfficeColorDialog.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@5585 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2017-01-02 11:15:19 +00:00
parent c40b7b608c
commit 47c45023ca
3 changed files with 43 additions and 28 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
components/mbColorLib/examples/fulldemo/main.pas
View File

@@ -330,9 +330,9 @@ end;
// only for internet shortcuts
procedure TForm1.FormCreate(Sender: TObject);
begin
MaxHue := 360;
MaxSat := 240;
MaxLum := 240;
// MaxHue := 360;
// MaxSat := 240;
// MaxLum := 240;
with TIniFile.Create(ExtractFilePath(Application.ExeName) + '\MXS Website.url') do
try
WriteString('InternetShortcut','URL', 'http://mxs.bergsoft.net');