请问:我若是想在Delphi中运行DOS命令(WIN2K,WIN98下),该怎样做?--Keeper2000(50分)

  • 主题发起人 主题发起人 tomol
  • 开始时间 开始时间
to wql
谢谢,的确可以,原来我就少个.com,(怎么以前的老大们都不说?而且
好像还能调用成功?)呵呵,先记你50分
但是带重定向仍然不行,dos窗口一闪而过
有的老大说copy命令也能调用成功,你能把这两个一起搞定(再加分),我再一起给你分
如果不行,说一下,我就给你分了
 
to d.r.s
你那里实际执行通过了么?
我这里98,xp执行后都是一点反应都没有,没有生成的a.txt
参数改成sw_show都看不到窗口
 
可以用以下方法:(以dir命令为例)
winexec('command.com/c dir>d:/a.txt',SW_HIDE);
dir操作的结果被保存在D盘的a.txt文件中;其他的dos命令也可以用此方法。
 
如果给的路径上有空格,好象就不行了也。
 
1. to tomol:
; ;该给我加分了!哈哈哈!!!

2. to xiao_min:
; ;把你的问题说清楚一些,比如你要把什么定向到什么上。
 
to wql:
从文件定向输入,或定向输出到文件
比如有一个文本文件y,里面就一个y字母,format c: <y,(我用
批命令的方式调用成功),这就是从文件定向输入
那些比如什么dir >a.txt,就是定向输出到文件了
 
to xiao_min:

这次应该给我分数了!不要小气!哈哈哈!!!

1. 下面的所有操作必须在你的执行程序目录下!

2. 比如你要格式化软盘,调用Format.COM,该程序必须按两次回车最后按N键才格式化完毕!
***把下面的格式存为文件In.TXT(注意开始必须两个空行):


N

***把上面的格式存为文件In.TXT(注意开始必须两个空行):

3. winexec('C:/WINDOWS/COMMAND/COMMAND.COM /C TYPE IN.DAT|C:/WINDOWS/COMMAND/format.COM a:>OUT.TXT',sw_normal);
; ;执行结果将自动格式化并输出到文件OUT.TXT中,你可以把OUT.TXT打开看看即可。
; ;格式化过程有点慢,请耐心!
 
对不起应该为:
3. winexec('C:/WINDOWS/COMMAND/COMMAND.COM /C TYPE IN.TXT|C:/WINDOWS/COMMAND/format.COM A:>OUT.TXT',sw_normal);
IN.DAT为IN.TXT
 
我记得format.com /autotest的话就不需要按回车了
 
to wql:
用你的type方法,在我这里调试通不过(xp2600),但是改成
winexec('C:/windows/system32/COMMAND.COM /C c:/windows/system32/format.com
;e: /q <y',sw_normal);
就OK了,执行成功,但xp里对于该盘有文件,还是没文件时的提示并不一样,呵呵,
不过调用方法到底是会了,谢谢
给你200分,http://www.delphibbs.com/delphibbs/dispq.asp?lid=788088
如果还不满意,今天我做了一个QQ proxy,可以看到QQ的所有数据,(还不完善,
比如只支持无用户的Socks代理),呵呵,如果想要,mail to :
xiaomin8184@263.net ;我发给你
 
多謝wql大俠,也要感謝xiao_min的熱心提問,分已給出
 
后退
顶部