Values ranges corrected
This commit is contained in:
parent
8de3008fde
commit
81d7acf723
@ -173,7 +173,7 @@ object AdjustForm: TAdjustForm
|
||||
Top = 133
|
||||
Width = 390
|
||||
Height = 131
|
||||
ActivePage = TabSheet1
|
||||
ActivePage = TabSheet2
|
||||
Align = alBottom
|
||||
TabOrder = 1
|
||||
object TabSheet1: TTabSheet
|
||||
@ -406,7 +406,7 @@ object AdjustForm: TAdjustForm
|
||||
Width = 257
|
||||
Height = 15
|
||||
LargeChange = 100
|
||||
Max = 1000
|
||||
Max = 10000
|
||||
PageSize = 0
|
||||
TabOrder = 2
|
||||
OnChange = scrollBrightnessChange
|
||||
|
@ -477,7 +477,7 @@ var
|
||||
i: integer;
|
||||
strx, stry, strw, strh: string;
|
||||
begin
|
||||
if LimitVibrancy then scrollVibrancy.Max := 1000 else scrollVibrancy.Max := 3000;
|
||||
if LimitVibrancy then scrollVibrancy.Max := 100 else scrollVibrancy.Max := 3000;
|
||||
{ Read posution from registry }
|
||||
Registry := TRegistry.Create;
|
||||
try
|
||||
|
Loading…
Reference in New Issue
Block a user