Hi,

I want to make a LabeledEdit descendant with two EditLabels. But it is not an easy task because TBoundLabel have a hardcoded name SubLabel. Worked out a solution for myself, see the attachment. But that solve only the naming problem. What is the good and easy solution for others? Double every thing for the new label in example
TCustomLabeledEdit.DoPositionLabel?

Gabor
-------------- next part --------------
A non-text attachment was scrubbed...
Name: boundlabel_inc.diff
Type: text/x-patch
Size: 269 bytes
Desc: not available
URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus/attachments/20140919/77a2176c/attachment.bin>