Question

易语言如何按下某键时钟周期=1，放开时钟周期=0 ？

易语言如何按下某键启时钟，放开那个键关闭时钟 ？

Answer 1

.版本 2

.程序集 窗口程序集1

.程序集变量 i, 长整数型

.子程序 __启动窗口_按下某键, 逻辑型

.参数 键代码, 整数型

.参数 功能键状态, 整数型

.如果 (键代码 ＝ #A键)

    .如果 (时钟1.时钟周期 ＝ 0)

        时钟1.时钟周期 ＝ 1

    .否则

    .如果结束

.否则

.如果结束

.子程序 __启动窗口_放开某键, 逻辑型

.参数 键代码, 整数型

.参数 功能键状态, 整数型

.如果 (键代码 ＝ #A键)

    时钟1.时钟周期 ＝ 0

.否则

.如果结束

.子程序 _时钟1_周期事件

i ＝ i ＋ 1

_启动窗口.标题 ＝ 到文本 (i)

.子程序 __启动窗口_创建完毕

i ＝ 0