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

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

Как обьявить событие при создании компоненты [D6, WinXP]


Oleg_K ©   (2005-02-28 09:12:00) 

Имеется модуль Unit (uOperation без формы),
ругается на то, что:
Incompatible types: 'method pointer and regular procedure'
что мне сделать? обьявить тип? как?

{это пример, но суть та}
procedure Start(I: Integer);

 procedure Click;
 begin
   Beep;
 end;

var
 Timer: TTimer;
begin
 Timer:=TTimer.Create(nil);
 Timer.Interval:=I;
 Timer.OnTimer:=Click;  
end;


begin...end   (2005-02-28 11:43:00) [1]

> Shirson ©   (28.02.05 11:36) [2]

procedure MyClass.Click(Sender: TObject)

Т.е. процедура должна быть методом какого-нибудь объекта. Или методом класса.


Shirson   (2005-02-28 11:36:00) [2]

procedure Click (sender:TObject);
И сделать процедуру не локальной.


MBo   (2005-02-28 09:14:00) [3]

http://www.delphikingdom.ru/asp/viewitem.asp?catalogid=342


Наверх

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