Текущий архив: 2005.03.13;
Скачать: CL | DM;

Вниз

Как обьявить событие при создании компоненты   Найти похожие ветки 

← →
Oleg_K ©   (2005-02-28 09:12) [0]

Имеется модуль 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;

---

← →
MBo ©   (2005-02-28 09:14) [1]

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

---

← →
Shirson ©   (2005-02-28 11:36) [2]

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

---

← →
begin...end ©   (2005-02-28 11:43) [3]

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

procedure MyClass.Click(Sender: TObject)

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

---

Страницы: 1 вся ветка

Текущий архив: 2005.03.13;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.032 c