Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Рандомный цвет [D7, WinXP]


Страницы:   1 2

MrBadge ©   (2011-04-13 10:45:00) 

Здравствуйте!
Такой вопрос: можно ли, используя функцию рандом для покраски текста в лейбле, убрать все темные цвета (то есть с какого номера они начинаются?).
Label1.Font.Color:= Random(65535);
Или проще создать отдельно массив и отбирать цвета вручную? Заранее спасибо.


Dennis I. Komarov   (2011-05-06 10:21:00) [1]

Скрин покажи, а то пока действительно колхоз


w   (2011-05-06 06:58:00) [2]


> Anatoly Podgoretsky ©   (05.05.11 15:39) [28]
> > w  (05.05.2011 15:15:27)  [27]Например 7fffffff -> 80000000


собсно про альфу никто и не говорит.


> antonn ©   (05.05.11 18:18) [29]
> > делать рандомно цвет подложки от него негатив на меткутакой
> "колхоз" будет... :)


Ну так оно и так колхоз :)


antonn   (2011-05-05 22:41:00) [3]


> Автор вопроса до сих пор так и не поведал, после какой травы
> ему в башку пришла его бредовая идея.

Мне такая бредовая идея приходит когда я в играх метки на экране должен расставлять.


Anatoly Podgoretsky   (2011-05-05 20:42:00) [4]

> Amoeba_  (05.05.2011 19:49:30)  [30]

Тут помню, тут не помню.


Amoeba_   (2011-05-05 19:49:00) [5]

Автор вопроса до сих пор так и не поведал, после какой травы ему в башку пришла его бредовая идея.


antonn   (2011-05-05 18:18:00) [6]


> делать рандомно цвет подложки от него негатив на метку

такой "колхоз" будет... :)


Anatoly Podgoretsky   (2011-05-05 15:39:00) [7]

> w  (05.05.2011 15:15:27)  [27]

Например 7fffffff -> 80000000


w   (2011-05-05 15:15:00) [8]

делать рандомно цвет подложки от него негатив на метку


Anatoly Podgoretsky   (2011-05-05 08:44:00) [9]

> Очень Злой  (04.05.2011 22:27:25)  [25]

Выпендриться, ни у кого нет, а меня есть, остальные ламеры позорные


Очень Злой   (2011-05-04 22:27:00) [10]


> наверняка есть алгоритмы, на вскидку
> NewR = 255-OldR
> NewG = 255-OldG
> NewB = 255-OldB
> даст максимально разный цвет. Проверил так


максимально разностный это скорее так:

if OldR>127 then NewR:=0 else NewR:=255;
и.т.д.


> смещать на процентов 30, да и все.


тогда сразу на 50% смещать...
NewRGB:=OldRGB xor $808080;

Только вот зачем лейбы красить в непонятные цвета, как хочет топикстартер не понимаю... Или это новая мода в дизайне?


KilkennyCat   (2011-04-23 03:10:00) [11]

твои цвета даже не влезают.т.е. еще один вариант....


KilkennyCat   (2011-04-23 03:08:00) [12]


> Германн ©   (23.04.11 03:01) [22]

а там много альтернативных вариантов.
+CLK --Green--Blue----White--Yellow-White-Blue
Data --White--Yellow--Green--Red----Green-Yellow
GND --Yellow--Black---Orange-Gray---Black-White
Vcc --Red-----Red----Blue----Brown--Red--Orange


Германн   (2011-04-23 03:01:00) [13]


> Германн ©   (23.04.11 02:49) [21]
>
>
> > так получаем четко выраженную разницу в яркости
>
> Не буду спорить, лень вдумываться в то, что меня сейчас
> мало волнует.
>

Ты вот мне объясни цветовую гамму PS/2 кабеля для клавы.
Data  - Black
Ground - Red
+5V  - Orange
Clock - Yellow
а то я в полном недопорумании. То ли я дурак, то ли не я.


Германн   (2011-04-23 02:49:00) [14]


> так получаем четко выраженную разницу в яркости

Не буду спорить, лень вдумываться в то, что меня сейчас мало волнует.


KilkennyCat   (2011-04-23 02:32:00) [15]

а что там понимать. берем ffffff - 30% будет 3с3с3с - вот и прибавляем их.
пример (k - это эти 30%):
000000 + k = 3с3с3с
ffffff + k = 3c3c3c
eeeeee + k = 2b2b2b

так получаем четко выраженную разницу в яркости, можно и сильней разброс сделать...


Германн   (2011-04-23 01:51:00) [16]


> смещать на процентов 30, да и все.

Хорошо сказано, но не понятно. :)


KilkennyCat   (2011-04-23 01:18:00) [17]

смещать на процентов 30, да и все.


Dimka Maslov   (2011-04-22 21:52:00) [18]

stas ©   (21.04.11 16:28) [16]

Преставим себе ситуацию, когда цвет равен $808080....


stas   (2011-04-21 16:28:00) [19]

MrBadge   (13.04.11 10:45)
Можно сделать так:
Label1.Font.Color:= Random(clWhite);
Label1.Color:=clWhite-Label1.Font.Color;

В это случае цвет фона будет являться негативом цвета шрифта и всегда будет виден, только вот насколько это красиво будет не знаю )


Dimka Maslov   (2011-04-14 13:22:00) [20]

Для того, чтобы отличить "светлый" цвет от "тёмного" надо перевести его в цветовое пространство HSL.


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо