Forcefully hiding the text of a TCustomLabel?

[djjd47130]

I am making a custom label, and am inheriting it from a TCustomLabel. I am doing my own drawing directly to the canvas, but since I implemented the Transparent mode, I realized that the original caption is still showing behind my drawing regardless of clearing it. How can I keep the original inherited caption from drawing in a TCustomLabel component?


JD Solutions

 

[djjd47130]

BTW, I'm creating a custom label component inherited from the TCustomLabel, republishing selected properties, and doing a certain custom drawing which should override the original caption drawing. I did an override on the paint procedure to draw my own stuff, which I do a FillRect on the label's canvas before I draw, which should clear over the original label drawing, but doesn't. When in transparent mode, I can still see the inherited caption showing behind my drawing.

JD Solutions

 

[djjd47130]

Nevermind, I solved it. I did an override of the Caption and made my own caption property in its place, which a) sets the inherited caption to blank, and b) draws my custom caption instead.

I should have known better If I were using a TCustomControl like I was going to, it would have been easy, but the TCustomLabel already has all the properties I need.

Now if I can only figure out how to implement auto wrapping the text...

JD Solutions