Как у потомков TCustomEdit назначать свое свойство text?

← →
Aleksandr. (2005-01-14 15:46) [0]

Когда кладешь компонент на форму, его текст превращается в имя+номер. А если у меня компонент от Edit, который должен пропускать только числа, но свойство Text должно оставаться доступным (чтобы в строковом виде его получать)? Никакие присваивания в констракторе не помогают...

← →
MBo © (2005-01-14 16:55) [1]

Не очень понятно, в чем же, собственно, состоит вопрос.
Думаю, стоит обратить внимание на
csSetCaption и TControl.SetName

1. В конструкторе:
ControlStyle := ControlStyle - [csSetCaption];
Text := "0";

2. Либо в CreateParams добавить стиль окна ES_NUMBER, либо (если нужны не только цифры) запретить ввод неверных символов, перекрыв KeyDown и обработку WM_PASTE.

Как у потомков TCustomEdit назначать свое свойство text? Найти похожие ветки