Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.05.02;
Скачать: [xml.tar.bz2];




Вниз

Как преобразовать порядок цветовых компонентов? 


lipskiy   (2002-04-20 20:19) [0]

В Дельфи порядок комнонетов BGR, а в HTML - RGB. Я генерю HTML-страничку программно, и мне надо вставить в тег BODY параметр bgcolor. Цвет мне известен, но он имеет обратный порядок компонентов. Написал процедуру, которая переставляет местами компоненты:

function InvertHexColor(Clr: string): string;
begin
Result:= Clr;
if length(Clr)<>6 then exit;
Result:= Clr[5] + Clr[6] + Clr[3] + Clr[4] + Clr[1] + Clr[2];
end;


И вызываю:
InvertHexColor(IntToHex(Some.Color));

Все работает, если задавать цвета нестандартные. Но если Some.Color имеет системный цвет, например clBtnFace, то преобразование происходит неверно.

Нет ли чего нибудь стандартного для этой операции, или м.б. подскажете, как это правильно сделать?



lipskiy   (2002-04-20 21:24) [1]

Всем спасибо.
Уже разобрался.



alxx   (2002-04-20 23:02) [2]

У меня была такая же проблема. Как?




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.05.02;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.027 c
3-2493            ruslan_as             2002-04-11 15:33  2002.05.02  
DBLookupComboBox1


1-2503            zlo                   2002-04-18 17:24  2002.05.02  
ПОЛУЧЕНИЕ РАЗМЕРА ПАПКИ


1-2561            som                   2002-04-18 15:02  2002.05.02  
как совместить TEdit вместе с TCombobox, може компонента есть


4-2722            Rail                  2002-02-27 12:45  2002.05.02  
Удаленное соединение


1-2570            ruslan_as             2002-04-19 11:12  2002.05.02  
Удалить все файлы из каталога