| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Какие параметры цвета (в системе RGB) стандартной формы?
11111 © (2004-11-17 09:53:00)Какие параметры цвета (в системе RGB) стандартной формы?
Fenik (2004-11-20 14:26:00) [1]>Poirot © (19.11.04 16:27) [3]
Твой ответ не полон. А мой есть необходимое дополнение ;))
var
C: TColor;
R, G, B: Byte;
begin
C := ColorToRGB(Form1.Color)
R := Lo(C);
G := Lo(C shr 8);
B := Lo((C shr 8) shr 8);
end;
Anatoly Podgoretsky (2004-11-19 16:40:00) [2]Fenik (18.11.04 20:11) [2]
И получишь ерунду, номер индекса в системной палитре.
Poirot (2004-11-19 16:27:00) [3]>> [2]
По вопросу это не подходит.
Ты получишь бред, если попробуешь использовать системные цвета типа clWindow и прочие:) Их знаечения как раз надо брать из таблиц, что и делаеться в ColorToRGB.
Fenik (2004-11-18 20:11:00) [4]R := Lo(Color);
G := Lo(Color shr 8);
B := Lo((Color shr 8) shr 8);
Poirot (2004-11-17 12:24:00) [5]SysUtils.ColorToRGB(Form1.Color)
| |
