Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.01.09;
Скачать: CL | DM;

Вниз

Градиентаня заливка   Найти похожие ветки 

 
Stas   (2003-12-23 15:06) [0]

Как с помощью канвы закрасить окружность градиентным цветом ?


 
REA   (2003-12-23 15:12) [1]

Есть функция GradientFill, но она видимо только с прямоугольными областями работает. Алгоритм может быть такой: Взять начальный цвет и конечный, проинтерполировать по Hue (тону) и разбить на заданное количество оттенков. Для каждого оттенка нарисовать сектор круга.


 
TUser   (2003-12-23 15:17) [2]

На этом сайте есть статья про градиентную заливку формы. Можно переделать под окружность.


 
Stas   (2003-12-23 15:24) [3]

REA © (23.12.03 15:12) [1]

А где взять функцию GradientFill ?


 
REA   (2003-12-23 15:25) [4]

А она с ошибкой. Лучше действительно статью посмотреть.


 
Stas   (2003-12-23 15:26) [5]

REA © (23.12.03 15:25) [4]

Спасибо сейчас посмотрю.
А функцию я нашел.

Всем спасибо.


 
EugenCFG   (2003-12-23 18:31) [6]

Можно вручную... с помощью матрицы изменяя один из RGB
Вот пример

for i:=0 to Image1.Width do
for j:=0 to Image1.Height do
Pixels[i,j]:=RGB(i,0,0);

Но для не больших размеров окружности.
Если надо для больших, больше чем 255 пикселей в диаметре, то пишите...



Страницы: 1 вся ветка

Текущий архив: 2004.01.09;
Скачать: CL | DM;

Наверх




Память: 0.45 MB
Время: 0.011 c
1-25426
Бушин Сергей
2003-12-24 05:50
2004.01.09
Как добалять элементы в TActionMainMenuBar в RunTime


4-25640
Колян_К
2003-11-06 17:36
2004.01.09
Как из своей проги закрыть чужое окно


11-25269
Дмитрий С
2003-04-18 06:56
2004.01.09
TKOLToolBar


4-25674
UPR
2003-11-06 23:15
2004.01.09
Насчет мышки


6-25489
BJValentine
2003-11-06 11:12
2004.01.09
Сокеты





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский