一,首先引入“mmsystem”单元。二,启动定时器: var MMTimerID: Integer; // 定时器ID MMTimerID := timeSetEvent(1000, 0, @TimerProc, 0, TIME_PERIODIC);三,定时器过程代码:procedure Tim... Read More
posted @ 2014-07-29 19:26
findumars
Views(425)
Comments(0)
Diggs(0)
字符串格式参数的日期比较函数我在NT Service里,使用delphi的CompareDate函数出错,我怀疑这个函数有bug,总是说我的参数多了'',所以没办法自己弄了一个![delphi]view plaincopy{//功能:比较日期//参数://a:比较的日期,格式(2013-07-23)... Read More
posted @ 2014-07-29 18:39
findumars
Views(869)
Comments(0)
Diggs(0)

浙公网安备 33010602011771号