取运行参数问题

gytxtx · 发表于 2024-2-23 19:56:46

变量名	类型	静态	数组	备注
参数文本	文本型		0
Command	文本型

' 如果真 (信息框 (“此程序会占用您的系统资源。” ＋ #换行符＋ “请在运行之前保存你所有的文件，并且打开任务管理器。” ＋ #换行符＋ “对于运行此程序造成的损失，本作者概不负责。” ＋ #换行符＋ “请问您真的要运行这个程序吗？”, #警告图标＋ #是否钮, “警告！”, _启动窗口) ＝ #否钮)
' 结束 ()
' _启动窗口.可视＝假
取命令行 (参数文本) ' 此段源码来自精易模块“系统_取运行参数”作用：返回被当前程序打开的第一个参数,基本上是文件名

如果真 (取数组成员数 (参数文本) ＞ 0 且文件是否存在 (参数文本 [1])) ' 在本程序的作用：可以用工具箱双击打开媒体文件

' 返回 (参数文本 [1])

' 标准版的系统占用

如果真 (参数文本 [1] ＝ “精币”)

信息框 (“ggg”, 0, , )

如果真 (参数文本 [1] ＝ “”)

信息框 (“寄了”, 0, , )

结束 ()

' 返回 (“”)
信息框 (“没有执行代码”, 0, , )
Command ＝系统_取运行参数 ()

如果真 (Command ＝ “精币”)

信息框 (“1”, 0, , )

结束 ()