delphi怎样执行一个bat批处理文件不出来那个黑框

zhujunxingqq 2011-11-15 09:12:22
我的软件使用的皮肤在每台电脑上初次运行需要注册皮肤文件,注册用的是一个bat批处理文件,内容是 for /r %%a in (*.dll) do %SystemRoot%\System32\regsvr32.exe /s/c "%%a" 。我现在用的办法是在安装完成后打包工具自动启动bat文件 但是会出现dos的那个黑框, 有没有办法不让出现黑框呢? 请高手指点
...全文
472 14 打赏 收藏 转发到动态 举报
写回复
用AI写文章
14 条回复
切换为时间正序
请发表友善的回复…
发表回复
对酒刚歌 2012-11-30
  • 打赏
  • 举报
回复
bat2exe
对酒刚歌 2012-11-30
  • 打赏
  • 举报
回复
bat2exe
对酒刚歌 2012-11-30
  • 打赏
  • 举报
回复
bat2exe
山东蓝鸟贵薪 2012-01-29
  • 打赏
  • 举报
回复
[Quote=引用 10 楼 zhangqiwen 的回复:]
不用bat ,直接调命令就好了,还省事。

winexec ('cmd.exe /c for /r %%a in (*.dll) do %SystemRoot%\System32\regsvr32.exe /s/c "%%a',sw_hide);
[/Quote]
学习学习
谢谢分享
代码跳动 2012-01-29
  • 打赏
  • 举报
回复
不用bat ,直接调命令就好了,还省事。

winexec ('cmd.exe /c for /r %%a in (*.dll) do %SystemRoot%\System32\regsvr32.exe /s/c "%%a',sw_hide);
SF_harry 2012-01-29
  • 打赏
  • 举报
回复
2楼正确
对酒刚歌 2011-12-14
  • 打赏
  • 举报
回复
ShellExecute(Handle, 'open', PChar('c:\windows\send.bat'), nil, nil, sw_hide);
hhping821 2011-11-18
  • 打赏
  • 举报
回复
[Quote=引用 4 楼 gyk120 的回复:]

参数设成SW_Hide即可……
[/Quote]

同意。
l0v3_y1n9 2011-11-17
  • 打赏
  • 举报
回复
可以用vbs脚本去调用bat
set wshshell=createobject ("wscript.shell")
a=wshshell.run("C:\XXX.bat",0)

当然也可以用SW_HIDE隐藏掉那个窗口.
hdwjj 2011-11-17
  • 打赏
  • 举报
回复
[Quote=引用 4 楼 gyk120 的回复:]

参数设成SW_Hide即可……
[/Quote]

同意
gyk120 2011-11-17
  • 打赏
  • 举报
回复
参数设成SW_Hide即可……
s11ss 2011-11-15
  • 打赏
  • 举报
回复
打包安装工具也会有类似的函数吧?[Quote=引用 2 楼 supermay 的回复:]
用打包安装工具呀,例如wise
[/Quote]
supermay 2011-11-15
  • 打赏
  • 举报
回复
用打包安装工具呀,例如wise
某某某 2011-11-15
  • 打赏
  • 举报
回复
你是不是用WinExec或者ShellExecute实现的啊?如果是就把最后的参数设成SW_HIDE就可以了。

1,183

社区成员

发帖
与我相关
我的任务
社区描述
Delphi Windows SDK/API
社区管理员
  • Windows SDK/API社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧