如何获取动态创建的计时器标签

Question

如何在处理其到期的函数中获取动态创建的计时器标记？

procedure TMainForm.TimerExpired(Sender: TObject);
begin
   // how do I get the tag here?

谁是Sender？主要形式？

Answer 1

Sender是指向您的计时器对象的指针，该对象调用此事件处理程序。

因此TTimer(Sender).Tag将是您的计时器的标记值。