Mam algorytm który wylicza nowe wartości dla ustawień monitora (kontrast)DC. Brightness to wartość w byte podwana od 0-128... jednak ten efekt nie zadowala mnie do końca... Otóż on ma ogólnie pojaśnić chwilowo ekran... a po zastosowaniu tego czarny nie stanie się mniej czarny... bądź bardziej - tyczy się on tylko innych kolorów... już nie wiem jak to uzystakć :( może ktoś mnie olśni :)
pozdrawiam
for i := 0 to 255 do
begin
Result := Min(Round(i * (Brightness + 2*64) / 250), 155);
RGBTablica.Red[i] := Result shl 8; { MSB przesuwam bity}
RGBTablica.Green[i] := Result shl 8;
RGBTablica.Blue[i] := Result shl 8;
end;