Recent

Author Topic: Aero Glass Effect Doesn't Work  (Read 5855 times)

johnya

  • New member
  • *
  • Posts: 8
Aero Glass Effect Doesn't Work
« on: March 11, 2012, 09:03:27 pm »
Hi,
I am trying to implement Aero Glass effect using the technique described here:
http://wiki.lazarus.freepascal.org/Aero_Glass

But it just doesn't work for me. The resulting form has black background, and the labels on it have magenta contours.

I've tried this on several other projects but it is still the same. I suspect the problem will be with setting the transparency of the form using SetLayeredWindowAttributes. When I set the form color to black and do not change the window style to Layered, I can see the aero glass effect, but all black texts are transparent as well.

I'm quite new in Lazarus, so it may be easy, but, please, can somebody help me?

I've attached very simple project, taken from Lazarus examples (childsizinglayout). I used exactly the code from the wiki (link is above).

Thank you.

lainz

  • Guest
Re: Aero Glass Effect Doesn't Work
« Reply #1 on: March 11, 2012, 10:48:52 pm »
The label has magenta color because you need special controls designed to work with aero.

In this article

http://wiki.lazarus.freepascal.org/Aero_Glass

there is a bugs section where you can see the problems of that code.

Quote
As you can see in the first image Labels aren't displayed fine in Aero Glass, there are links with components and code that show how to make "Glow Labels":

GlowLabel for Delphi
http://development.mwcs.de/glowlabel.html

Aero Glass - ein Text (Label) hintergrund "machen"
http://www.delphipraxis.net/953968-post4.html

Also if you clic the transparent part of the window the back window / desktop is selected (focus is lost in the form with aero glass).

johnya

  • New member
  • *
  • Posts: 8
Re: Aero Glass Effect Doesn't Work
« Reply #2 on: March 11, 2012, 11:08:21 pm »
Thanks. I've studied it. What's interesting, your screentshot looks much better then mine. I've attached it. The background is black on my computer (Vista). Did you change the source code?

I have Lazarus version 0.9.30.
BTW, this effect works on my computer if I do not set the window layered.

lainz

  • Guest
Re: Aero Glass Effect Doesn't Work
« Reply #3 on: March 12, 2012, 12:11:13 am »
I've not changed nothing

Just when I opened your project I've not installed a package i put 'ignore use TForm as replace'.

 

TinyPortal © 2005-2018