时钟和程序集问题

鲤鱼跃龙门

突然发现，时钟周期事件只能在默认的程序集里使用


我想放到，自己建立的程序集里使用，但是好像没用

Hoibben

不喜欢添加时钟组件的话就用api：
[e]
.版本 2

.DLL命令 _设置时钟, 整数型, "user32.dll", "SetTimer", 公开, _设置时钟 (取窗口句柄(), 1, 50, &优化)
    .参数 窗口句柄, 整数型, , 取窗口句柄()
    .参数 时钟ID, 整数型, , 1
    .参数 时钟周期, 整数型, , 毫秒
    .参数 子程序指针, 子程序指针
[/e]
直接复制到dll命令定义表即可。。。

Hoibben

一样的，指定窗口即可。。。
_启动窗口.时钟1.时钟周期 ＝ 1000

鲤鱼跃龙门

Hoibben 发表于 2013-6-20 01:11
一样的，指定窗口即可。。。
_启动窗口.时钟1.时钟周期 ＝ 1000

这个不行，我试过了。

Hoibben

鲤鱼跃龙门 发表于 2013-6-20 08:46
这个不行，我试过了。

我上面不是发了另外一种方法么，用api通用，我不介意你给我最佳。。。

电脑寄生虫

可以多一步。
在 自己的程序集里加入 打算叫时钟周期做的子程序，比如叫  时钟
在窗口程序集放入 _时钟1_周期事件  里面放入程序集1里的  时钟（）

SalHe

.版本 2

.子程序 设置时钟周期
.参数 时钟, 时钟
.参数 周期, 整数型, 可空, 单位:毫秒   默认10
.局部变量 周期2

.如果 (是否为空 (周期) ＝ 真)
    周期2 ＝ 10
.否则
    周期2 ＝ 周期
.如果结束

时钟.时钟周期 ＝ 周期2

SalHe

[e]
.版本 2

.子程序 设置时钟周期
.参数 时钟, 时钟
.参数 周期, 整数型, 可空, 单位:毫秒   默认10
.局部变量 周期2

.如果 (是否为空 (周期) ＝ 真)
    周期2 ＝ 10
.否则
    周期2 ＝ 周期
.如果结束

时钟.时钟周期 ＝ 周期2[/e]

WeBox

时钟的作用很大耶可以做挂

晨鹤

不推荐6楼的。
时钟本来就占用资源，在多一个子程序，会很卡的。
用api不错