![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Генерация собственных событий [D5, Win95/98]
Vince © (2002-03-05 22:03:00)Пожалуйста, помогите. Нигде не нашёл, как генерировать собственные события в Delphi, а мне очень нужно это узнать
Lord Warlock (2002-03-12 09:51:00) [1]А если тебе надо из какого-то кода пустить событие, можно
использовать SendMessage(WM_My1) или PostMessage(WM_My1), а в классе допустим формы объявить процедуру
OnЧто-то(Params); message WM_My1;
Теперь если сообщение послано, OnЧто-то выполнится
Виктор Щербаков (2002-03-06 09:05:00) [2]События - это свойства процедурного типа.
В объявлении класса, объяви их как объявляешь остальные свойства.
Например:
property OnMyEvent: TMyEvent read fx write fx;
где fx - переменнаятипа TMyEvent. А TMyEvent - процедурный тип.
Но он должен быть объявлен как of object. Т.е. переменная fx
должна указывать на метод объекта, а не просто на процедуру или функцию.
Затем в реализации класса делай вызов как у
Anatoly Podgoretsky © (06.03.02 08:00)
Anatoly Podgoretsky (2002-03-06 08:00:00) [3]События не гкнерируются, они возникают, а генерируется вызов обработчика, это простой вызов процедуры, например
if assigned(fx) then fx(self);