Change Label.Font.Color without flashing
Posted on 1997-09-10
I have several overlapping, transparent
(dynamicly created) labels.
To be specific,
1 Label.Left > Label.Left
Label.Left > Label.Left
2 Label.Left + Label.Width > Label.Left
3 Label.Left + Label.Width > Label.Left
.Top and .Height are the same, .width varies.
I want to change the Label.Font.Color (e.g. from clWhite
Suppose I do only this: Label.Font.Color:=clNavy
Normally this will lead to 'flashing'. For a short moment
you will see a disruption on your screen. I hate that.
So I tried this:
Adding a procedure DOESNTWORK the form redirecting
And in DOESNTWORK is stated
IF SCREWUP THEN inherited.
When I change the color of Label
I state that SCREWUP:=FALSE
Result: the flashing/flickering is gone,
but there are clWhite pixels visible around the
new clNavy pixels. I do not want that.
I can't just e.g. enlarge the font before changing
the color (because unwised pixels will be changed too).
Is there a solution to this?