Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Для новичков > Как задать процедуру программно созданному таймеру

Автор: MozgZombi 5.7.2012, 16:45

Я программно создал таймер, но как ему задать процедуру которую он должен делать на срабатывание.

Автор: Frees 5.7.2012, 17:19

Код


....
Timer1.OnTimer := Timer1Timer;
....
procedure TForm1.Timer1Timer(Sender: TObject);
begin
//
end;

Автор: MozgZombi 5.7.2012, 17:41

Спасибо!!!

Автор: Newbiebie 27.7.2012, 06:41

Хм. Как у вас получилось? у меня ошибка. OnTimer - это TNotifyEvent, а то, что я пишу - процедура.

E2010 Incompatible types: 'TNotifyEvent' and 'Procedure'

Что делать?

Автор: Alexeis 27.7.2012, 06:48

Так он использовал метод объекта вместо процедуры, вот и получилось.

Автор: Newbiebie 27.7.2012, 07:36

Спасибо за ответ, но я не совсем поняла. Я создаю объект типа TTimer, и мне нужно указать, что именно будет исполняться при событии OnTimer. Выше советуют:

Код


....
Timer1.OnTimer := Timer1Timer;
....
procedure TForm1.Timer1Timer(Sender: TObject);
begin
//
end;

То есть - создать процедуру и затем методу объекта как бы присвоить ее. Так не работает =\ где-то что-то упускаю?

Автор: Frees 27.7.2012, 08:53

Цитата(Newbiebie @ 27.7.2012, 10:36

)

процедуру и затем методу

не процедуру а метод класса TForm1.