蜗牛程序 DOS

第一卷 第一章 书香屋 更新时间:2007-1-12 23:35:37 本章字数:2880 ?蜗牛程序 蜗牛中如何调用DOS并得到返回文本 源程序如下： 子程序：_启动子程序 返回值类型：整数型 备注：本子程序在程序启动后最先执行 cmd ＝ 读环境变量 (“ComSpec”) 子程序：执行dos命令行 返回值类型：文本型 参数：参数 数据类型：文本型 局部容器：文件长度 局部容器：文件号 局部容器：句柄 句柄 ＝ 执行 (主窗口.取窗口句柄 () “open” cmd “ /c ” ＋ 参数 ＋ “>” ＋ 临时文件名 当前目录 0) 延时 (1000) 如果真 (句柄 ＝ 0) 返回 (转换为字节集 (“执行命令行失败！”)) 如果真结束 文件号 ＝ 打开文件 (临时文件名 #读入 ) 文件长度 ＝ 取文件长度 (文件号) 延时 (250) 判断循环首 (文件长度 ≠ 取文件长度 (文件号)) *备注：等待命令行运行完毕 文件长度 ＝ 取文件长度 (文件号) 延时 (250) 判断循环尾 () 返回信息 ＝ 读入文本 (文件号 ) 关闭文件 (文件号) 写到文件 (临时文件名 {; };) *备注：清除文件内容 返回 (返回信息) 本来有更好的方法调用DOS的，那就是匿名管道技术。但因为易语言在自定义数据类型和DLL的一些限制，没有办法实现。 现在或者方法只是将DOS命令输出到文本，然后再读取来取回命令的返回信息。 这样有两个缺点： 1.命令行中不能够再有“”字符 2.不能够得到错误信息的输出 蜗牛中寻找窗口子程序 子程序：寻找窗口 返回值类型：文本型 局部容器：窗口标题 数据类型：文本型 局部容器：窗口句柄 数据类型：整数型 局部容器：标题长 数据类型：整数型