Тема: Delphi
Показать сообщение отдельно
Старый 07.07.2005, 07:20   #2
Fenix
AnimeManiac
 
Аватар для Fenix
 
Регистрация: 18.01.2005
Сообщений: 451
Отправить сообщение для Fenix с помощью ICQ
По умолчанию

Цитата:
Сообщение от Chamal
Вопрос по дельфи:

Необходимо индекс цвета разложить на 3 составляющие (RGB);
Есть обратная функция - RGB(r,g,b);
Есть функция ColorToRgb() но она возвращает одну переменную типа Longint.

Ранше помню точно делал, а сейчас забыл хоть убей...
Please HELP.
Вот разложение на спектральные составляющие:
r:=GetRValue(цвет)
g:=GetGValue(цвет)
b:=GetBValue(цвет)
Fenix вне форума   Ответить с цитированием