feat(fillbar): option fond transparent (cle de couleur), l'opacite reste sur les boutons
Co-Authored-By: Claude Opus 5 <noreply@anthropic.com>
This commit is contained in:
@@ -1347,6 +1347,7 @@ begin
|
||||
LFb.AddPair('buttons', PM.UserPrefs.GetPref('lazyButtons'));
|
||||
LFb.AddPair('icons', TJSONBool.Create(PM.UserPrefs.GetPref('lazyIcons') = '1'));
|
||||
LFb.AddPair('alpha', PM.UserPrefs.GetPref('lazyAlphaPct'));
|
||||
LFb.AddPair('clear', TJSONBool.Create(PM.UserPrefs.GetPref('lazyClear') = '1'));
|
||||
WebBrowser.ExecuteJavaScript(
|
||||
'if(window.Bridge&&Bridge.onFillBar)Bridge.onFillBar(' + LFb.ToJSON + ')');
|
||||
finally
|
||||
@@ -1359,6 +1360,8 @@ begin
|
||||
PM.UserPrefs.SetPref('lazyButtons', GetParam('buttons'));
|
||||
if GetParam('icons') = '1' then PM.UserPrefs.SetPref('lazyIcons', '1')
|
||||
else PM.UserPrefs.SetPref('lazyIcons', '0');
|
||||
if GetParam('clear') = '1' then PM.UserPrefs.SetPref('lazyClear', '1')
|
||||
else PM.UserPrefs.SetPref('lazyClear', '0');
|
||||
var LAlpha := StrToIntDef(GetParam('alpha'), 60);
|
||||
if (LAlpha >= 25) and (LAlpha <= 100) then
|
||||
PM.UserPrefs.SetPref('lazyAlphaPct', IntToStr(LAlpha));
|
||||
|
||||
Reference in New Issue
Block a user