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

Переаод цвета в hex   Найти похожие ветки 

← →
Ezorcist   (2006-07-06 00:05) [0]

Пользователь указал цвет для label, надо разместить его на html странице, впрос как перевести этот цвет в #hex?

---

← →
Джо ©   (2006-07-06 00:18) [1]

В HTML цвет кодируется тремя шестнадцатеричными числами, каждое из которых отвечает за его составляющие в палитре RGB — красный (R), зеленый (G), синий (B).
Цвет, представленный типом TColor можно перевести в стандартный тип GRB функцией ColorToRGB.
Отдельные значения составляющих можно извлечь функциями GetRValue, GetGValue и GetBValue.
Вот, пожалуй, и всё.

---

← →
PSPF2003 ©   (2006-07-06 09:25) [2]

А как тебе такая функция, подойдет?

function ColorToHtmlColor(ColorRGB : TColor): string;
begin
 Result := IntToHex(GetRValue(ColorRGB), 2) + IntToHex(GetGValue(ColorRGB), 2)
   + IntToHex(GetBValue(ColorRGB), 2);
end;

---

← →
PSPF2003 ©   (2006-07-06 09:41) [3]

Да забыл добавить, если у тебя D2005 там уже есть такая функция поиши ее.

---

← →
Ega23 ©   (2006-07-06 09:52) [4]

Только там (в HTML), вроде, не RGB, а BGR идёт.

---

← →
Gero ©   (2006-07-06 10:03) [5]

> [4] Ega23 ©   (06.07.06 09:52)

В HTML как раз RGB.

---

← →
PSPF2003 ©   (2006-07-06 10:16) [6]

> В HTML как раз RGB.

Да нет, Ega23 в BGR

---

← →
Ega23 ©   (2006-07-06 10:37) [7]

Я точно не помню, там было какое-то различие между Delphi-представлением цвета и HTML-представлением. Третий с первым байты местами менялись.
Могу ошибаться, т.к. сталкивался года 4 назад...

---

← →
Ega23 ©   (2006-07-06 10:42) [8]

Конечно, имелось ввиду строковое представление цвета.

---

← →
PSPF2003 ©   (2006-07-06 10:48) [9]

Цвет
Delphi: $33D1FD
HTML: FDD133

---

← →
Ega23 ©   (2006-07-06 10:57) [10]

> Delphi: $33D1FD
> HTML: FDD133
>

Во, именно это я и имел ввиду.

---

← →
antonn ©   (2006-07-06 11:41) [11]

function GetHTMLColor(cl: TColor): string;
var  rgbColor: TColorRef;
begin
 rgbColor := ColorToRGB(cl);
 Result :=
 Format("%.2x%.2x%.2x",
 [GetRValue(rgbColor),
 GetGValue(rgbColor),
 GetBValue(rgbColor)]);
end;

---

← →
Zeqfreed ©   (2006-07-06 14:14) [12]

> [6] PSPF2003 ©   (06.07.06 10:16)

В HTML — RGB, в Delphi — BGR.

---

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

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



Память: 0.47 MB
Время: 0.039 c