Экспертная система Delphi.int.ru

Сообщество программистов
Общение, помощь, обмен опытом

Доброго времени суток, уважаемые эксперты!
Есть такой код:

var
c:tcolor;
begin
c:=rgb(255,120,147);
end;

Вопрос задал: Ученый (статус: 8-ой класс) Вопрос отправлен: 28 апреля 2009, 17:34 Состояние вопроса: открыт, ответов: 1.

Ответ #1. Отвечает эксперт: Вадим К

Здравствуйте, Ученый!
А ведь вроде было. Всё очень просто.

b := GetBValue(c);
r := GetRValue(c);
g := GetGValue(c);

Ответ отправил: Вадим К (статус: Академик) Время отправки: 28 апреля 2009, 18:05 Оценка за ответ: 5 Комментарий к оценке: Большое спасибо:))))

Мини-форум вопроса

Паровоз (статус: 10-ый класс), 28 апреля 2009, 23:37 [#1]: "первый байт оставлен под альфаканал" В Delphi 7 старший байт в TColor используется для других целей. Об этом можно узнать из хелпа или, например, из http://www.acasystems.com/en/color-picker/faq-delphi-tcolor.htm

Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.