Эффект - невидимка

[Ra72]

Delphi XE6.

Делаю появляющееся окошко на форме с эффектом тени.

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

Если просто переключать видимость, то эффект работает.

 

[AngryOwl]

Не получится. Это "фича" такая)

По крайней мере не получится - пока не исправят все баги с отрисовкой "невидимых" или совсем "прозрачных" компонентов.

Если получится каким-либо образом, дайте знать - будет весьма занятно...)

 

Для форм выполненных в своем стиле, создание "теней" лучше делать с помощью собственного стиля с использованием png изображения "тени".

Насколько я помню - даже был такой пример (назывался типа HDform, или типа того...)

 

Создайте собственный стиль, например:

- FormMyStyle: TLayout

-- imgbkgrnd: Image (сюда поместите png с тенью. Align - Contents)

-- contlt : TLayout (сюда прямоугольники и т.п., для непосредственного вида формы)

 

Для примера прикладываю png изображение тени, с параметрами: BitmapMargins 18,16,16,20; Margins 1,4,3,1

 

в итоге будет что-то типа

 

Потом делаете вашу форму прозрачной, кидаете на нее панель TPanel, с выравниванием Align = Clients или Contents, затем придаете панельке стиль FormMyStyle. Вот и будет форма с тенью.

 

P.S. Думаю стоит отметить, что PNG изображение тени будет работать наааамного быстрее эффекта тени или подобного.

[Ra72]

AlexG, спасибо!