Wie Sender an TimerEvent weitergeben?

[formosa]

Hallo,

Wie kriege ich den Sender ins Timer Event?

Delphi-Quellcode:

procedure TForm1.TrackBar1Change(Sender: TObject); 
begin
  Timer1.Enabled := true //
end;

procedure TForm1.Timer1Timer(Sender: TObject); // <---- Sender?
begin
  If Sender = TrackBar1 then beep;
end;

Ich hab Momentan keine Idee wie ich das machen soll.

Vielen Dank schon mal an euch

Gruss Chris