Jak narysować gradient aby wyglądał tak jak na zdjęciu:
http://www.delphitologia.cba.pl/test.jpg
Czy ktoś mógłby napisać jak to zrobić? Z góry dziękuję za pomocną odpowiedź.
Jak narysować gradient aby wyglądał tak jak na zdjęciu:
http://www.delphitologia.cba.pl/test.jpg
Czy ktoś mógłby napisać jak to zrobić? Z góry dziękuję za pomocną odpowiedź.
poszukaj w źródłach różnych komponentów które gradient malują, np tych z JEDI
tak ciężko poszukać samemu
http://www.google.com/search?client=opera&rls=pl&q=delphi+gradient&sourceid=opera&ie=utf-8&oe=utf-8
var i:integer;
begin
with Canvas do
begin
Brush.Style:=bsClear;
for i:=0 to 12 do
begin
Pen.Color:=RGB(0, 255-i*10, 0);
Rectangle(100-i, 100-i, 400+i, 100+i);
end;
end;
end;
Ewentualnie kolorki sobie dobierz :)