Z zwhc Unregistered / Unconfirmed GUEST, unregistred user! 2001-01-04 #2 TThread + GetTickCount or TThread + now
K kisse Unregistered / Unconfirmed GUEST, unregistred user! 2001-01-04 #5 var time1,time2:integer; implimention ... procedure one; begin time1 := getTickCount; {do something else} end; procedure two; begin time2 := gettickcout; if ((time2-time1) > yourDefineTime) then {you code here} end;
var time1,time2:integer; implimention ... procedure one; begin time1 := getTickCount; {do something else} end; procedure two; begin time2 := gettickcout; if ((time2-time1) > yourDefineTime) then {you code here} end;
K Kent Unregistered / Unconfirmed GUEST, unregistred user! 2001-01-04 #7 hehe,Timer好像是使用窗口过程截获WM_TIMER消息实现的...
E emildy Unregistered / Unconfirmed GUEST, unregistred user! 2001-01-05 #8 比如说,我要在一个GraphicControl上每隔一些时间画一次, 当然,我可以用GraphicControl和Timer两个控件来实现, 那么,能不能将两个合并成一个呢?
L ljactive Unregistered / Unconfirmed GUEST, unregistred user! 2001-01-05 #9 可以加循环在,循环体中控制间隔的时间(Sleep()),另外,注意将控制权返还给操作系统 用(Application.ProcessMessage);不过性能很不稳定.