[lmikle]

Можешь назначить, а само событие должно быть методм формы.

Код:

TForm1 = class(TForm)
...
  procedure MyTimerEvent(Sender : TObject);
  procedure CreateMyTimer;
end;

...

procedure TForm1.MyTimerEvent(Sender : TObject);
begin
  // Здесь делаем то, что надо по таймеру.
  // Sender - на самом деле ссылка на вызвывший таймер
end;

procedure TForm1.CreateMyTimer;
var
  ATimer : TTimer;
begin
  ATimer := TTimer.Create(Self);
  ATimer.Parent := Self;
  ATimer.OnTimer := MyTimerEvent;
  ATimer.Interval := 200;
  ATimer.Enabled := True;
end;