Delphi Timer定時器使用

2021-07-28 12:18:06 字數 1519 閱讀 6733

timer定時器是乙個非視覺化元件,能夠定時觸發ontimer事件,完成模擬時鐘、系統延時、倒計時等工作。在system選項卡中。

1. timer的主要屬性

(1) enabled屬性:當值為true時,開啟定時器,否則關閉定時器。預設值為true。

(2) interval屬性:控制ontimer事件觸發的時間間隔,單位是毫秒。將interval設定為0,相當於關閉定時器。預設值為1000ms(1秒)。

2. timer的主要事件

timer只有乙個ontimer事件。當timer開啟時,每經過interval屬性指定的時間,timer就會觸發ontimer事件,執行其中的程式。

例:倒計時

unit unit1;

inte***ce

uses

windows, messages, sysutils, variants, classes, graphics, controls, forms,

dialogs, spin, extctrls, stdctrls, mask, buttons;

type

tform1 = class(tform)

timer1: ttimer;

maskedit1: tmaskedit;

bitbtn1: tbitbtn;

procedure timer1timer(sender: tobject);

procedure formcreate(sender: tobject);

procedure bitbtn1click(sender: tobject);

private

public

end;

varform1: tform1;

m,s:integer;

implementation

procedure tform1.timer1timer(sender: tobject);

begin

s:=s-1;

if s=-1 then

begin

s:=59;

m:=m-1;

if m=-1 then m:=59;

end;

maskedit1.text:=inttostr(m)+':'+inttostr(s);

maskedit1.sellength:=0;

end;

procedure tform1.formcreate(sender: tobject);

begin

m:=9;s:=10;//初始時間09分10秒

maskedit1.editmask:='!00:00;1;0';//時間格式,未輸入字元用0代

timer1.interval:=1000;

end;

procedure tform1.bitbtn1click(sender: tobject);

begin

timer1.enabled:=not timer1.enabled;//停止倒計時

end;

end.

Delphi Timer定時器使用

timer定時器是乙個非視覺化元件,能夠定時觸發ontimer事件,完成模擬時鐘 系統延時 倒計時等工作。在system選項卡中。1 timer的主要屬性 1 enabled屬性 當值為true時,開啟定時器,否則關閉定時器。預設值為true。2 interval屬性 控制ontimer事件觸發的時...

定時器使用

dword winapi checksendinfovector lpvoid lpparameter return 0 void callback dotimer hwnd hwnd,uint umsg,uint ptr idevent,dword dwtime timerproc的引數hwnd是...

workman定時器使用

workerman 定時器例子,可單獨使用,稍加改善可以開啟乙個守護程序,用來做一些定時發布等等類似的任務,使用方便,不需要額外的擴充套件或者類似 crontab 等工具。以下是測試程式 php view plain copy use workerman autoloader use workerm...