Скачать: CL | DM;

Цвет РГБ в Интегер   Найти похожие ветки 

← →
electroman239 ©   (2007-01-25 21:29) [0]

помогите пожалуйста!как перевести red green blue в значение типа integer

---

← →
Kolan ©   (2007-01-25 21:43) [1]

«[0] electroman239 ©   (25.01.07 21:29)
помогите пожалуйста!как перевести red green blue в значение
типа integer»

Кжется RGB функция называется.

---

← →
DevilDevil ©   (2007-01-25 23:05) [2]

clRed, clGreen, clBlue, ... сиотри константы модуля Graphics.pas

var
 int : integer;
begin
 int := Integer(clBlue);
 Caption := IntToStr(int);
end;

---

← →
TRUNK ©   (2007-01-26 10:20) [3]

В 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;


---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.04 c