Jak zrobić łagodne przejście kolorów od czerwonego do zielonego w 100 krokach.
Chodzi mi, żeby gauge w miarę zbliżania się do 100 zmieniał kolor z czerwonego na zielony.
Jeśli można to też jak wybrać kolory przejścia.--Delphi 6
Pozdrowienia,
Imperior
Jak 2 krotnie klikniesz na color tam wybierz kolor np. zielony :))))))))
I kod koloru bedzie np. #0F47823 i tak chyba dodawaj co jedna liczbe #0F47829 itp. wiec może to ma byc tak
Najprościej i najlepiej zrobić coś takiego...
procedure TForm1.Button1Click(Sender: TObject);
var
t : Byte;
begin
for t := 0 to 100 do
begin
Gauge1.ForeColor := RGB(255-2t,0+2t,0);
Gauge1.Progress := t;
Sleep(10);
end;
end;
...chyba o to chodziło :-)--Delphi 6
Pozdrawiam All
Dzięki dokładnie o to chodziło.--Delphi 6
Pozdrowienia,
Imperior
Moze w celach edukacyjnych wymyslicie jak wbudowac te wlasciwosc tworzac komponent ColorGauge?--Pawel
Delphi6
Hej.
MCkawa: A jakbym chciał zrobić przejście od koloru [123,56,200] do koloru [32,123,0] to jak to mam zrobić według twojego algorytmu ?? Tzn wytłumacz ogólną zasade tego algorytmu.--Looknijcie na main Page - głópawa troche ale obleci ;-})
te trzy liczby to rgb(red,green,blue)
Włącz sobie Painta i naciśnij dwa razy na jakiś kolor i daj niestandardowy.
Na dole będą pola Czerwony , Zielony i Niebieski. Zależnie jakie liczby tam dasz bedziesz mial rozne kolory.
i teraz takie coś, że im większy progres tym mniej czerwonego a więcej zielonego. W ten sposob będzie przejście z czerw. do ziel. Jak pokombinujesz to dopasujesz do swoich potrzeb.--Delphi 6
Pozdrowienia,
Imperior
Piasiu:
Ogólną zasade wytłumaczył ci już Imperior.
A przykład który podałeś jest już trudniejszy
bo wielkości przejść pomiędzy kolorami
nie są podzielnikami ilości pętli
(albo ilość pętli nie jest podzielnikiem
wielkości przejścia) - chyba niepotrzebnie zakręciłem :)
Jutro może pomyśle bo dzisiaj już mi się nie chce.
BTW: Kolory w postaci RGB są wykorzystywane w skórkach do Winampa
do określenia kolorów analizatora widma i znajdują się w pliku
viscolor.txt.--Delphi 6
Pozdrawiam All