Цвеветовая гамма

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Sirik
Perspicaz
Perspicaz
Аватара пользователя
 
Сообщения: 2280
Зарегистрирован: 19.02.2004 (Чт) 16:09
Откуда: Бердичев, Украина

Цвеветовая гамма

Сообщение Sirik » 28.01.2005 (Пт) 14:04

Есть числовой инвервал от 100 до 1000 с шагом в 10.
Есть цветовой интервал от жёлтого до зелёного.

Как их связать?

Т.е. надо от значения первого получать цвет второго

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 28.01.2005 (Пт) 14:39

Самый лучший способ - преобразовать в HSB/HLS и масштабировать Hue, потом преобразовать обратно. В данном конкретном случае еще можно масштабировать красный на убывание (100 - Red 255, 1000 - Red 0).
Lasciate ogni speranza, voi ch'entrate.

Sirik
Perspicaz
Perspicaz
Аватара пользователя
 
Сообщения: 2280
Зарегистрирован: 19.02.2004 (Чт) 16:09
Откуда: Бердичев, Украина

Сообщение Sirik » 28.01.2005 (Пт) 14:44

Я попробовал так:
RGB(red, 1000 - red, 0)

и вродк всё ок?!

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 28.01.2005 (Пт) 14:47

нет, не ок.
должно быть так:
RGB(255*(I - 100)/900, 255, 0)
Lasciate ogni speranza, voi ch'entrate.


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: Google-бот, Yandex-бот и гости: 6

    TopList