|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
05.08.2008, 20:39 | #1 |
Форумчанин
Регистрация: 01.02.2007
Сообщений: 785
|
Color в цикле
Подскажите как засунуть в цикл for данные строки:
Код:
Изо всей благодати
В руках крепко сжатых Я донесу только капли |
05.08.2008, 20:58 | #2 |
Меркантильный кю
Участник клуба
Регистрация: 02.02.2008
Сообщений: 1,001
|
Изменяй в цикле значения RGB составляющих и юзай функцию
Код:
Росли вроде умными, выросли дурнями... (c)А.Васильев
|
05.08.2008, 23:51 | #3 |
Телепат с дипломом
Старожил
Регистрация: 10.06.2007
Сообщений: 4,929
|
Есть стандартная функция RGB, пример использования:
Brush.Color:= RGB(255,0,0); //красный цвет
The future is not a tablet with a 9" screen no more than the future was a 9" black & white screen in a box. It’s the paradigm that survives. (Kroc Camen)
Проверь себя! Онлайн тестирование | Мой блог |
05.08.2008, 23:56 | #4 |
Форумчанин
Регистрация: 01.02.2007
Сообщений: 785
|
справился немного по-другому.
Код:
Изо всей благодати
В руках крепко сжатых Я донесу только капли |
06.08.2008, 00:05 | #5 |
Форумчанин
Регистрация: 01.02.2007
Сообщений: 785
|
2 mutabor - да, знаю. Было интересно, как именно работать, если цвет в 16-о виде, не переводя его в 10-ый. Спасиб за подсказку ))))
Изо всей благодати
В руках крепко сжатых Я донесу только капли |
06.08.2008, 00:22 | #6 | |
Телепат с дипломом
Старожил
Регистрация: 10.06.2007
Сообщений: 4,929
|
Цитата:
Код:
The future is not a tablet with a 9" screen no more than the future was a 9" black & white screen in a box. It’s the paradigm that survives. (Kroc Camen)
Проверь себя! Онлайн тестирование | Мой блог |
|
06.08.2008, 00:45 | #7 |
Форумчанин
Регистрация: 01.02.2007
Сообщений: 785
|
2 mutabor - спасибо, примерно понял ))))))
Изо всей благодати
В руках крепко сжатых Я донесу только капли |
06.08.2008, 00:59 | #8 |
Телепат с дипломом
Старожил
Регистрация: 10.06.2007
Сообщений: 4,929
|
Вспомнил откуда у меня эта функция, это юзер в эдит должен был вводить цвет в HEX формате, в таком виде - FFFFFF. Поэтому там лишнего наворочено, проверки.
А вообще StrToInt делает то, что надо. color:=StrToInt($FFFFFF);
The future is not a tablet with a 9" screen no more than the future was a 9" black & white screen in a box. It’s the paradigm that survives. (Kroc Camen)
Проверь себя! Онлайн тестирование | Мой блог |
06.08.2008, 15:07 | #9 |
Форумчанин
Регистрация: 01.02.2007
Сообщений: 785
|
у меня все проще - нарисовал спектр (216 квадратиков разного цвета), там пользователь выбирает цвет и все. ))))))
Изо всей благодати
В руках крепко сжатых Я донесу только капли |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
String and color | RealSHELS | Общие вопросы Delphi | 9 | 05.07.2008 09:35 |
выбор значений в цикле | Melok | Паскаль, Turbo Pascal, PascalABC.NET | 3 | 15.12.2007 22:56 |
Редактирование файла в цикле | Var17 | Общие вопросы Delphi | 1 | 13.12.2007 14:51 |