|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
11.12.2007, 17:42 | #1 |
Познаю мир
Форумчанин Подтвердите свой е-майл
Регистрация: 05.10.2007
Сообщений: 387
|
InttoiHex function
Я преобразую цвет из интегер в цвет каторым пользуются обычно в ХТМЛ, тоесть такого формата : #00ff00
Мне посоветовали использовать функцию inttohex таким способом inttohex(panel1.Brush.Color,6) где 6 - количество выдаваемых в результат функции. Вроде функция работает правильно но цвет каторый я присваиваю panel1.Brush.Color с помощью colordialog1 при конвертации с помощью функции inttohex цвет текста в EI даже визульно не совпадает с цветом panel1.Brush.Color . Вопрос : Как мне ПРАВИЛЬНО переконвертировать TColor (онже integer ) в цвет формата #aeff2c ? (естественно знак # я добалю сам если нужно ...) Она конвертирует в некоторых случях правильно но мне кажется что наоборот : вместо например #00ffee она возвращает : #eeff00 . если самому преобразовать то цвета визуально совпадают ... ---
Последний раз редактировалось GAGARIN-NEW; 11.12.2007 в 18:07. |
11.12.2007, 18:16 | #2 |
With best regards
Участник клуба
Регистрация: 20.04.2007
Сообщений: 1,448
|
Помоему это особенность Делфи.
Раскладка цветов в Делфи идет так BBGGRR
Life is too short, play more...
Как правильно задавать вопросы |
11.12.2007, 18:24 | #3 |
Познаю мир
Форумчанин Подтвердите свой е-майл
Регистрация: 05.10.2007
Сообщений: 387
|
Спасибо, я понял. но всёравно при ручной перестановке чвет не совпадает с тем цветом
вот вложение ---
|
15.12.2007, 10:45 | #4 |
Форумчанин
Регистрация: 03.11.2006
Сообщений: 278
|
Я пользовался Hex(255,color) 255-это кол-во байтов. Цвет остается токой какой нужен.
Разработка сайтов -дело прикольное
|
27.03.2008, 20:21 | #5 |
Участник клуба
Регистрация: 08.03.2008
Сообщений: 1,537
|
Цвет в строку:
function ColorToString(Color: TColor): string; Пример: var s: string; ... s:= ColorToString(Form1.Color); ... после чего можно сохранить строку на внешнем носителе Строку в цвет: function StringToColor(const S: string): TColor; Form1.color := StringToColor(s); |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
function.file-put-contents | DJ_MILK | PHP | 3 | 23.07.2008 05:48 |
function ajaxSend ( action ) | mager | JavaScript, Ajax | 2 | 15.05.2008 16:31 |
function procedure | Toxa | Microsoft Office Access | 1 | 28.11.2007 18:32 |
function WinExecAndWait | malevich | Общие вопросы Delphi | 4 | 05.02.2007 19:00 |