Delphi URL Protocol 获取参数

Delphi URL Protocol 获取参数

Delphi URL Protocol 获取参数

虽然如今B/S,大前端盛行,单浏览器在某些方便还是受到一定限制。
翻出Delphi7写了一个Application,开发环境Windows7。

URL Porotocal 注册表:

` 导出reg文件如下。

Windows Registry Editor Version 5.00

[HKEY_CLASSES_ROOT\TiLimsExe]
"URL Protocol"=""
@="Lims应用程序"

[HKEY_CLASSES_ROOT\TiLimsExe\Defaulticon]
@="F:\\T-Lims\\报告备份\\ReportBak.exe"

[HKEY_CLASSES_ROOT\TiLimsExe\shell]

[HKEY_CLASSES_ROOT\TiLimsExe\shell\open]

[HKEY_CLASSES_ROOT\TiLimsExe\shell\open\command]
@="F:\\T-Lims\\报告备份\\ReportBak.exe %1"

调用:

<a href="TiLimsExe:1,211">点击OPEN</a>

常规参数获取无效

我们知道D中,运行参数通过 paramCount 和 ParamStr() 获取,但是实测发现,通过 URL Protocol调起时,ParamCount 总为 1。
我判断该方法只能在系统环境下调用才有效——感兴趣的可以自行翻看下源码。

只要思想不滑坡,方法总比困难多

既然PAS不行,那么试试 Win32 API —— 这是yyds。
GetCommandLine
获取完整命令行
D中会得到:TiLimsExe:1,211

结束!

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 打赏
    打赏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

Ti-蜗牛

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付:¥1
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值