皮皮网

1.?易语言无语js树形菜单源码?????????????Դ??

??????????????Դ??

       .版本 2

       .支持库 shellEx

       .支持库 eAPI

       .程序集 窗口程序集1

       .程序集变量 F1, 整数型

       .程序集变量 R, 整数型

       .程序集变量 真假, 逻辑型

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

       F1 ＝ 注册热键 (_启动窗口.取窗口句柄 (), 标签1.取窗口句柄 (), 0, #F1键)

       R ＝ 注册热键 (_启动窗口.取窗口句柄 (), 标签1.取窗口句柄 (), 0, #R键)

       真假 ＝ 假

       .子程序 _标签1_反馈事件, 整数型

       .参数 参数一, 整数型

       .参数 参数二, 整数型

       .如果真 (真假)

        .如果真 (参数一 ＝ R)

        延时 ()

        模拟按键 (#E键, , )

        .如果真结束

       .如果真结束

       .如果真 (参数一 ＝ F1)

        真假 ＝ 取反 (真假)

       .如果真结束