简单的列子，程序带参数启动

两个淡

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
文件号	整数型
i	整数型
参数分割	文本型		0
参数行	文本型		0
执行带的参数	文本型

' 可默认设置输入程序参数配置。
' F.程序 --> U.配置 --> 调试参数行： “/hosthwnd=0 /hostname=1 /memoryid=2”
' 或者快捷方式到 "C:\带参数启动列子.exe" /hosthwnd=0 /hostname=1 /memoryid=2
取命令行 (参数行)  ' * 数组:3{“/hosthwnd=0”,“/hostname=1”,“/memoryid=2”}
' 调试输出 (参数行)
如果 (取数组成员数 (参数行) ≠ 0)
计次循环首 (取数组成员数 (参数行), i)
参数分割 ＝ 分割文本 (参数行 [i], “=”, 2)  ' * 数组:2{“/hosthwnd”,“0”}
如果真 (取数组成员数 (参数分割) ＝ 2)
如果真 (参数分割 [1] ＝ “/hosthwnd”)  ' * 0
' 输出调试文本 (参数分割 [2])
执行带的参数 ＝ “ /hosthwnd=” ＋ 到文本 (取窗口句柄 ())
如果真 (参数分割 [2] ＝ “0”)
' 执行 (#打开文件, 取运行目录 () ＋ 'xxx.exe', 执行带的参数, , )  ' 带 句柄“hosthwnd” 参数启动程序
如果真 (是否已创建 (窗口1) ＝ 假)
载入 (窗口1, , 假)


如果真 (参数分割 [1] ＝ “/hostname”)  ' * 1
' 输出调试文本 (参数分割 [2])
如果真 (参数分割 [2] ＝ “0”)
如果真 (是否已创建 (窗口2) ＝ 假)
载入 (窗口2, , 假)


如果真 (参数分割 [1] ＝ “/memoryid”)  ' * 2
' 输出调试文本 (参数分割 [2])
如果真 (参数分割 [2] ＝ “0”)
如果真 (是否已创建 (窗口3) ＝ 假)
载入 (窗口3, , 假)


如果真 (是否已创建 (_启动窗口) ＝ 真)
销毁 ()  ' 关闭自身

处理事件 ()
计次循环尾 ()

如果真 (信息框 (“无参数信息。” ＋ #换行符 ＋ “参数行：” ＋ 到文本 (取数组成员数 (参数行)), 0, “提示：”, ) ＝ #确认钮 )
销毁 ()

.版本 2<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 文件号, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 参数分割, 文本型, , "0"<br /> .局部变量 参数行, 文本型, , "0"<br /> .局部变量 执行带的参数, 文本型<br /> <br /> ' 可默认设置输入程序参数配置。<br /> ' F.程序 --> U.配置 --> 调试参数行： “/hosthwnd=0 /hostname=1 /memoryid=2”<br /> ' 或者快捷方式到 "C:\带参数启动列子.exe" /hosthwnd=0 /hostname=1 /memoryid=2<br /> 取命令行 (参数行)  ' * 数组:3{“/hosthwnd=0”,“/hostname=1”,“/memoryid=2”}<br /> ' 调试输出 (参数行)<br /> .如果 (取数组成员数 (参数行) ≠ 0)<br />     .计次循环首 (取数组成员数 (参数行), i)<br />         参数分割 ＝ 分割文本 (参数行 <i>, “=”, 2)  ' * 数组:2{“/hosthwnd”,“0”}<br />         .如果真 (取数组成员数 (参数分割) ＝ 2)<br />             .如果真 (参数分割 [1] ＝ “/hosthwnd”)  ' * 0<br />                 ' 输出调试文本 (参数分割 [2])<br />                 执行带的参数 ＝ “ /hosthwnd=” ＋ 到文本 (取窗口句柄 ())<br />                 .如果真 (参数分割 [2] ＝ “0”)<br />                     ' 执行 (#打开文件, 取运行目录 () ＋ 'xxx.exe', 执行带的参数, , )  ' 带 句柄“hosthwnd” 参数启动程序<br />                     .如果真 (是否已创建 (窗口1) ＝ 假)<br />                         载入 (窗口1, , 假)<br />                     .如果真结束<br /> <br />                 .如果真结束<br /> <br />             .如果真结束<br />             .如果真 (参数分割 [1] ＝ “/hostname”)  ' * 1<br />                 ' 输出调试文本 (参数分割 [2])<br />                 .如果真 (参数分割 [2] ＝ “0”)<br />                     .如果真 (是否已创建 (窗口2) ＝ 假)<br />                         载入 (窗口2, , 假)<br />                     .如果真结束<br /> <br />                 .如果真结束<br /> <br />             .如果真结束<br />             .如果真 (参数分割 [1] ＝ “/memoryid”)  ' * 2<br />                 ' 输出调试文本 (参数分割 [2])<br />                 .如果真 (参数分割 [2] ＝ “0”)<br />                     .如果真 (是否已创建 (窗口3) ＝ 假)<br />                         载入 (窗口3, , 假)<br />                     .如果真结束<br /> <br />                 .如果真结束<br /> <br />             .如果真结束<br />             .如果真 (是否已创建 (_启动窗口) ＝ 真)<br />                 销毁 ()  ' 关闭自身<br />             .如果真结束<br /> <br />         .如果真结束<br />         处理事件 ()<br />     .计次循环尾 ()<br /> <br /> .否则<br />     .如果真 (信息框 (“无参数信息。” ＋ #换行符 ＋ “参数行：” ＋ 到文本 (取数组成员数 (参数行)), 0, “提示：”, ) ＝ #确认钮)<br />         销毁 ()<br />     .如果真结束<br /> <br /> .如果结束

xiaohok

我看不懂呀  想这用参数化启动传奇  但是看半天看不懂

977192391

学习了，666

田心杨

不错，可以在启动时启用不同参数。不过用读配置文件更好点，就是多个文件而已