delphi timer用法

Posted 2023-03-30

procedure TForm1.Timer1Timer(Sender: TObject);
begin
......;
end;
当属性里的ENABLE为FALSE时,这个过程的作用是什么?
什么情况下才会触发这个过程?

参考技术A 就是个定时器。Enabled就是开关，为False时这个东西就不工作了，里面的代码就不会被执行了。
它有个Interval属性，这个的单位是毫秒。当Enabled为True时，每隔Interval毫秒，就执行一次里面的代码。

比如，Interval设为1000，则每隔1000毫秒，里面的代码就被执行一次。本回答被提问者和网友采纳

delphi中的timer 控件代码问题

begin
If Label1.Left + Label1.Width > 0 Then
Label1.Left := Label1.Left - 10
Else
Label1.Left := Form1.Width;
end;

end.
详细说明下作用和用法
使用时并不是到最右边就可以马上移动到左边。而是要隔一段时间才行，怎么解决？

定时时间到执行下面代码
begin
If Label1.Left + Label1.Width > 0 Then
Label1.Left := Label1.Left - 10 //如果Label.left 没到最左边，则label向左移10
Else
Label1.Left := Form1.Width; //到最左边则，label移动最右边
end;

实现label不停从右边移动左边的功能

end. 参考技术A 什么作用和用法？
Timer的？ 参考技术B TTimer是一个定时器啊，可以设定每隔多少时间执行一次，具体可以看Delphi的帮助TTimer。