![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Цвет РГБ в Интегер
electroman239 © (2007-01-25 21:29:00)помогите пожалуйста!как перевести red green blue в значение типа integer
TRUNK (2007-01-26 10:20:00) [1]В 24-битном цвете:
Color: Integer;
R,G,B: Byte;
Color := (B shl 16)or(G shl 8)or R;
В 32-битном цвете:
Color: Integer;
R,G,B: Byte;
Color := (R shl 16)or(G shl 8)or B;
DevilDevil (2007-01-25 23:05:00) [2]clRed, clGreen, clBlue, ... сиотри константы модуля Graphics.pas
var
int : integer;
begin
int := Integer(clBlue);
Caption := IntToStr(int);
end;
Kolan (2007-01-25 21:43:00) [3]«[0] electroman239 © (25.01.07 21:29)
помогите пожалуйста!как перевести red green blue в значение
типа integer»
Кжется RGB функция называется.