Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как отловить изменение property Text в компоненте-наследни TEdit [D7, Win2k]


Akris ©   (2005-08-29 18:45:00) 

Помогите, пожалуйста. Мне нужно форматировать по заданным параметрам значение свойства Text у своего компонента, который я наследовал от стандартного TEdit.
Действия пользователя я перехватываю без проблем.
Проблема возникает тогда, когда я присваиваю свойству значение.
Например: edit имеет формат: 10 цифр и 3 после запятой. Я в программе присваиваю значение из базы данных форматом 5 и 2 после запятой. Результат: edit отображает 5 цифр и 2 после запятой, а евенты на OnKeyPress не дают ввести третью цифру после запятой.

Как решить не знаю.


ALI_YES   (2005-09-01 12:45:00) [1]

type
 TMyEdit = class (TEdit)
 protected
   procedure Change; override;
 end;

implementation

procedure TMyEdit.Change;
begin
 inherited;
 ShowMessage('Changed');
end;

Попробуй так


Юрий Зотов   (2005-08-30 16:19:00) [2]

Что не получается? Перекрыть метод Change не получается?


Akris   (2005-08-30 15:25:00) [3]

А как перекрыть OnChange? У меня никак не получается.

Заранее благодарен за ответ.


Юрий Зотов   (2005-08-29 19:35:00) [4]

> Как отловить изменение property Text
> в компоненте-наследни TEdit

Вариант 1 - обработать сообщение CM_TEXTCHANGED.
Вариант 2 - перекрыть метод Change.

> евенты на OnKeyPress...

1. Компонент не имеет права использовать события, доступные его пользователю. Иначе он может перекрыть их своими и компонент работать перестанет.

2. Текст можно ввести не только с клавиатуры, но и из буфера обмена.

> ...не дают ввести третью цифру после запятой.

Это уже вопрос алгоритма. Не для этой конференции.


Наверх

Титульная страница Поиск, карта сайта Написать письмо