таймер в классе

@FrolBrol · Регистрация: 02.01.2012

Author24 — интернет-сервис помощи студентам

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

Delphi

 type Tbase=class
   Fx,Fy:integer;
   FColor:Tcolor;
   FT:TTimer;
   constructor Create(a,b:integer);
   procedure TIME(????);
 end;
 
implementation
 
constructor Tbase.Create(a, b: integer);
begin
 inherited Create;
 fx:=a; fy:=b;
 Ft.OnTimer:=TIME(????);
 ft.Enabled:=true;
end;
 
procedure Tbase.TIME(???);
fx:=fx+1;
end;

Комментарий модератора

Используйте специальные теги форматирования программного кода!

@Somebody · 06.01.2012, 21:40

По идее надо FT, но если ты этот параметр не используешь, то в общем-то всё равно, что там будет.

@FrolBrol · 06.01.2012, 21:57 **[ТС]**

c FT не работает - пишет что отсутствует параметр типа.
там надо указать объект который вызывает- там всегда пишется Sender: TObject, это как бы предок всех объектов. Может например быть Button1. А в моем случая я не знаю что писать, потому что он сразу как бы выполнятся должен после вызова конструктора, и это у меня класс все находится не в главном модуле.

@Somebody · 06.01.2012, 22:16

А, я что-то сначала подумал, что вопрос про то, с каким Sender'ом вызывать. А так

Delphi

   type Tbase=class
...
procedure TIME(Sender: TObject);
end;
 
constructor Tbase.Create(a, b: integer);
begin
...
Ft.OnTimer:=TIME;
...
end;
 
procedure Tbase.TIME(Sender: TObject);
begin
...
end;

@FrolBrol · 06.01.2012, 22:32 **[ТС]**

так тоже пробывал, но при компиляции в Ft.OnTimer:=TIME; ошибка access violation

@БогДелфей · 06.01.2012, 23:07

таймер наверно не создал

@FrolBrol · 07.01.2012, 14:01 **[ТС]**

да
забыл создать сам таймер

Delphi

1	Ft:=Ttimer.Create(nil);

@Somebody 2835 / 1644 / 254 Регистрация: 03.12.2007 Сообщений: 4,222
	06.01.2012, 21:40	2
	По идее надо FT, но если ты этот параметр не используешь, то в общем-то всё равно, что там будет. 0

@FrolBrol 15 / 15 / 6 Регистрация: 02.01.2012 Сообщений: 73
	06.01.2012, 21:57 [ТС]	3
	c FT не работает - пишет что отсутствует параметр типа. там надо указать объект который вызывает- там всегда пишется Sender: TObject, это как бы предок всех объектов. Может например быть Button1. А в моем случая я не знаю что писать, потому что он сразу как бы выполнятся должен после вызова конструктора, и это у меня класс все находится не в главном модуле. 0

@FrolBrol 15 / 15 / 6 Регистрация: 02.01.2012 Сообщений: 73
	06.01.2012, 22:32 [ТС]	5
	так тоже пробывал, но при компиляции в Ft.OnTimer:=TIME; ошибка access violation 0

@БогДелфей 474 / 337 / 36 Регистрация: 31.05.2011 Сообщений: 1,162
	06.01.2012, 23:07	6
	таймер наверно не создал 0

	07.01.2012, 14:01