如何输入dos程序的参数值?(只有这么多分了) (5分)

  • 主题发起人 主题发起人 月光宝盒
  • 开始时间 开始时间

月光宝盒

Unregistered / Unconfirmed
GUEST, unregistred user!
我想一按查询按钮,则运行一dos程序(该程序有三个参数),
可是用winexec函数,那几个参数以及重定向符号如何写入函数中呢?
其中其中一个参数需用edit1.text来赋予,
如何写?
程序格式是这样:
程序名 参数1 参数2 > filename
 
如果程序本身支持帶參數起動,可以寫成這樣子:
winexec('dir *.exe >exe.txt',sw_normal);
 
楼上的不行!
况且我有一个参数要edit的值啊!
 
你可以定議一字符串啊:
str:='dir '+edit.text+'>exe.txt'
winexec( str,sw_normal);
 
S := ‘程序名 ’ + EDIT1。TEXT + ‘ 参数2 > filename‘
winexec(PCHAR(S),sw_normal);
 
还是不行!不知道程序有没有运行,
反正我重定向一个新的文件没有建立!
不成功!
 
看winexec()的返回值
 
如果在DOS下这样 {程序名 参数1 参数2 > filename} 能通过
那么:
S:=trim(含绝对路径和扩展名的程序名)+' '+trim(EDIT1.TEXT)+' '''+trim(字符参数2)
+' > c:/temp.txt';
WinExec(PChar(s),sw_normal);
 
Sorry,多了两点,修改:
如果 在DOS下这样 {程序名 参数1 参数2 > filename} 能通过,那么:
S:=trim(含绝对路径和扩展名的程序名)+' '+trim(EDIT1.TEXT)+' '+trim(字符参数2)
+' > c:/temp.txt';
WinExec(PChar(s),sw_normal);
否则
算了
结束
 
http://www.delphibbs.com/delphibbs/dispq.asp?lid=1607353
 
多人接受答案了。
 
后退
顶部