Sybaritica

Canada
10 Posts |
Posted - Jun 01 2021 : 07:08:33
|
Hi ... I am having difficulty adjusting Contrast in ImageEnView Images. I have been trying to use Proc.Contrast, Proc.Contrast2, and Proc.Contrast3, as well as Proc.AdjustBrightnessContrastSaturation, all with the same result.
I have tried using Buttons, Trackbars and ScrollBars as Controls, but I will illustrate my issue with Code using Buttons.
procedure TFormMain.Button1Click(Sender: TObject); begin ImageEnView1.Proc.Contrast (2); end;
procedure TFormMain.Button1Click(Sender: TObject); begin ImageEnView2.Proc.Contrast (-2); end;
Basically, the idea is to use Button1 to increase contrast in increments. This works, but the problem is that corresponding clicks of Button2 (de-incrementing), do not produce a corresponding change. That is to say, if I increase by, say, 4 clicks, and then decrease by 4 clicks, the image does not look as it did before making any changes. The difference in the original image increases with the number of increases/decreases, and gets even less like the original the more times I repeat the operation.
I feel I must be missing something, here. Can anyone explain?
|
|