Полупрозрачные тени окон и компонентов
Нашел компонент System.Windows.Forms.ControlPaint под Delphi Prism, с помощью которого можно рисовать на рабочем столе. Это позволило рисовать свои тени от форм и компонентов и полупрозрачные меню. Но не могу заставить ее рисоваться стабильно. Прорисовка тени вызывается, если форма или компонент прорисовывается (OnPaint) с помощью процедуры DrawShadow, например:
metod MyComponent.DrawShadow;
begin
ControlPaint.DrawReversibleLine(Self.PointToScreen (new Point(Self.Width,0)),Self.PointToScreen(new Point(Self.Width,Self.Height)),Color.DimGray);
end;
Однако, тень (в данном случае - серая линия справа от своего компонента) живет своей жизнью, мерцает когда захочет.
Нужна помощь! Как заставить ее прорисовываться только по желанию программиста?
|