如何在基类线程中启动定时器?

Chilkat

如题，如何在基类线程中启动定时器?

如果在程序集的子程序中启动定时器可以调用系统API(SetTimer)

但是如果在基类的方法里面，调用这个API就无法启动了。

各位在线的大神有什么方法，能够在类中启动定时器吗？

感谢...

youhong8576

请百度下基类模块

shandmail

  

窗口程序集名	保 留	保 留	备 注
鱼刺类_定时器, , 公开, 定时器/时钟(面向对象)。（类销毁时会自动销毁创建的定时器。）
变量名	类 型	数组	备 注
handle	整数型
Ptr	整数型

子程序名	返回值类型	公开	备 注
_初始化			当基于本类的对象被创建后，此方法会被自动调用

子程序名	返回值类型	公开	备 注
_销毁			当基于本类的对象被销毁前，此方法会被自动调用

销毁 ()

子程序名	返回值类型	公开	备 注
创建	逻辑型		创建定时器
参数名	类 型	参考	可空	数组	备 注
参数_周期事件子程序	子程序指针
参数_时钟周期	整数型				默认 1000ms （1秒）

变量名	类 型	静态	数组	备 注
Time	整数型
hand	整数型

判断 (是否为空 (参数_时钟周期) ＝ 真)
Time ＝ 1000
Time ＝ 参数_时钟周期
Ptr ＝ 到整数 (参数_周期事件子程序)
handle ＝ SetTimer (0, handle, Time, Ptr)
返回 (handle ≠ 0)

子程序名	返回值类型	公开	备 注
创建_int	逻辑型		创建定时器 整数型子程序指针
参数名	类 型	参考	可空	数组	备 注
参数_周期事件子程序	整数型
参数_时钟周期	整数型				默认 1000ms （1秒）

变量名	类 型	静态	数组	备 注
Time	整数型

判断 (是否为空 (参数_时钟周期) ＝ 真)
Time ＝ 1000
Time ＝ 参数_时钟周期
Ptr ＝ 参数_周期事件子程序
handle ＝ SetTimer (0, handle, Time, Ptr)
返回 (handle ≠ 0)

子程序名	返回值类型	公开	备 注
销毁	逻辑型		销毁已经创建的定时器

变量名	类 型	静态	数组	备 注
int	整数型

如果真 (handle ＝ 0)
返回 (真)
int ＝ handle
handle ＝ 0
int ＝ KillTimer (0, int)
返回 (int ≠ 0)

子程序名	返回值类型	公开	备 注
时钟周期	逻辑型		设置新周期时间
参数名	类 型	参考	可空	数组	备 注
参数_时钟周期	整数型				默认 1000ms （1秒）

变量名	类 型	静态	数组	备 注
Time	整数型

判断 (是否为空 (参数_时钟周期) ＝ 真)
Time ＝ 1000
Time ＝ 参数_时钟周期
handle ＝ SetTimer (0, handle, Time, Ptr)
返回 (handle ≠ 0)

.版本 2<br /> <br /> .程序集 鱼刺类_定时器, , 公开, 定时器/时钟(面向对象)。（类销毁时会自动销毁创建的定时器。）<br /> .程序集变量 handle, 整数型<br /> .程序集变量 Ptr, 整数型<br /> <br /> .子程序 _初始化, , , 当基于本类的对象被创建后，此方法会被自动调用<br /> <br /> <br /> <br /> .子程序 _销毁, , , 当基于本类的对象被销毁前，此方法会被自动调用<br /> <br /> 销毁 ()<br /> <br /> .子程序 创建, 逻辑型, 公开, 创建定时器<br /> .参数 参数_周期事件子程序, 子程序指针, 可空<br /> .参数 参数_时钟周期, 整数型, 可空, 默认 1000ms （1秒）<br /> .局部变量 Time, 整数型<br /> .局部变量 hand, 整数型<br /> <br /> .判断开始 (是否为空 (参数_时钟周期) ＝ 真)<br />     Time ＝ 1000<br /> .默认<br />     Time ＝ 参数_时钟周期<br /> .判断结束<br /> Ptr ＝ 到整数 (参数_周期事件子程序)<br /> handle ＝ SetTimer (0, handle, Time, Ptr)<br /> 返回 (handle ≠ 0)<br /> <br /> .子程序 创建_int, 逻辑型, 公开, 创建定时器 整数型子程序指针<br /> .参数 参数_周期事件子程序, 整数型, 可空<br /> .参数 参数_时钟周期, 整数型, 可空, 默认 1000ms （1秒）<br /> .局部变量 Time, 整数型<br /> <br /> .判断开始 (是否为空 (参数_时钟周期) ＝ 真)<br />     Time ＝ 1000<br /> .默认<br />     Time ＝ 参数_时钟周期<br /> .判断结束<br /> Ptr ＝ 参数_周期事件子程序<br /> handle ＝ SetTimer (0, handle, Time, Ptr)<br /> 返回 (handle ≠ 0)<br /> <br /> .子程序 销毁, 逻辑型, 公开, 销毁已经创建的定时器<br /> .局部变量 int, 整数型<br /> <br /> .如果真 (handle ＝ 0)<br />     返回 (真)<br /> .如果真结束<br /> int ＝ handle<br /> handle ＝ 0<br /> int ＝ KillTimer (0, int)<br /> 返回 (int ≠ 0)<br /> <br /> .子程序 时钟周期, 逻辑型, 公开, 设置新周期时间<br /> .参数 参数_时钟周期, 整数型, 可空, 默认 1000ms （1秒）<br /> .局部变量 Time, 整数型<br /> <br /> .判断开始 (是否为空 (参数_时钟周期) ＝ 真)<br />     Time ＝ 1000<br /> .默认<br />     Time ＝ 参数_时钟周期<br /> .判断结束<br /> handle ＝ SetTimer (0, handle, Time, Ptr)<br /> 返回 (handle ≠ 0)

  

DLL命令名	返回值类型	公开	备 注
SetTimer	整数型		创建/设置定时器
DLL库文件名:
user32
在DLL库中对应命令名:
SetTimer
参数名	类 型	传址	数组	备 注
hWnd	整数型
nIDEvent	整数型
hTime	整数型
hPtr	整数型

DLL命令名	返回值类型	公开	备 注
KillTimer	整数型		销毁定时器
DLL库文件名:
user32
在DLL库中对应命令名:
KillTimer
参数名	类 型	传址	数组	备 注
hWnd	整数型
nIDEvent	整数型

.版本 2<br /> <br /> .DLL命令 SetTimer, 整数型, "user32", "SetTimer", , 创建/设置定时器<br />     .参数 hWnd, 整数型<br />     .参数 nIDEvent, 整数型<br />     .参数 hTime, 整数型<br />     .参数 hPtr, 整数型<br /> <br /> .DLL命令 KillTimer, 整数型, "user32", "KillTimer", , 销毁定时器<br />     .参数 hWnd, 整数型<br />     .参数 nIDEvent, 整数型

Chilkat

shandmail 发表于 2016-8-17 16:54
[e=0].版本 2

.程序集 鱼刺类_定时器, , 公开, 定时器/时钟(面向对象)。（类销毁时会自动销毁创建的定时 ...

你试试线程启动，线程调用setTimer