Ok, soweit bin ich:
Delphi-Quellcode:
Gauge.Progress := Gauge.Progress + 1;
DoubleBuffered := true;
case Gauge.Progress of
0..9 : Gauge.ForeColor := $0000AA00;
10..19 : Gauge.ForeColor := $0000AA82;
20..29 : Gauge.ForeColor := $0000AAC3;
30..39 : Gauge.ForeColor := $0000AAED;
40..49 : Gauge.ForeColor := $0000AAFF;
50..59 : Gauge.ForeColor := $00009AFF;
60..69 : Gauge.ForeColor := $000081FF;
70..79 : Gauge.ForeColor := $00006BFF;
80..89 : Gauge.ForeColor := $000058FF;
90..100: Gauge.ForeColor := $000000FF;
end;
Nur der "Farbverlauf" sieht serh schlecht aus..
Er ist nicht flüssig. Kann man sowas unkomplizierter lösen?