Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Затенить панель [D7, WinXP]

Stanislav © (2006-09-25 10:54:00)
Подскажите пожалуйста как затенить панель со всеми ее элементами, т.е. есть панель, на ней лежит фотография и несколько надписей, хотелось бы снизить яркость на 50% на самой панели и ее элементах.

Stanislav (2006-09-25 15:20:00) [1]
Вобщем разобрался, спасибо всем!

clickmaker (2006-09-25 13:59:00) [2]

> снижаю яркость каждой точки на канве панели, я так понимаю
> сюда должны попсать элементы лежащие на панели?

не должны. У них своя канва.

Stanislav (2006-09-25 13:45:00) [3]
shr - трепет вызвало, но разобрался что к чему. :-)
Че-то я не пойму, снижаю яркость каждой точки на канве панели, я так понимаю сюда должны попсать элементы лежащие на панели? а они не попадают, даже уже сделал наследника и переопределил метод Paint.

clickmaker (2006-09-25 13:18:00) [4]

> разве что псевдоощущение, что shr - shl работают быстрее

а разве нет?

Ega23 (2006-09-25 13:16:00) [5]

> а если "shr 1" вызывает трепет в душе, то можно сделать
> "div 2".

А какая разница??? Ну разве что псевдоощущение, что shr - shl работают быстрее...

clickmaker (2006-09-25 12:30:00) [6]

> "shr 1" вызывает трепет в душе

старая привычка. Корни ее растут из программирования графики под ДОС, когда нужно было оптимизировать все, что можно ))

Barloggg (2006-09-25 12:24:00) [7]
а если "shr 1" вызывает трепет в душе, то можно сделать "div 2".
кстати где-то мне встречались проблемы с этим "shr 1" на какой-то винде и с каким-то конкретным типом данных. но точно не помню.
"div 2" работает всегда.

Stanislav (2006-09-25 11:56:00) [8]
Спасибо буду пробовать

clickmaker (2006-09-25 11:40:00) [9]

> как снизить яркость у точки на 50%

Panel1.Color := RGB(192, 192, 192);
Red := GetRValue(Panel1.Color);
Green := GetGValue(Panel1.Color);
Blue := GetBValue(Panel1.Color);
Red := Red shr 1;
Green := Green shr 1;
Blue := Blue shr 1;
Panel1.Color := RGB(Red, Green, Blue);

Stanislav (2006-09-25 11:31:00) [10]
Немного по другому поставлю вопрос, как снизить яркость у точки на 50%?

Stanislav (2006-09-25 11:30:00) [11]
Ega23 © (25.09.06 11:14) [1]
не, фотка не затимнится.

clickmaker (2006-09-25 11:22:00) [12]

> Enabled:=False;

Visible := (not true) and (not false);
-)

Ega23 (2006-09-25 11:14:00) [13]
Enabled:=False; ?
:-))))

Наверх

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