关于Shellexecute

Question

执行  Shellexecute(handle,nil,pchar('dir > d:\wang.txt'), nil,nil,sw_shownormal);
为什么得不到wang.txt文件呢？

Answer 1

Shellexecute(handle,nil,pchar('d:\wang.txt'), nil,nil,sw_shownormal);
这样写,不明白楼主pchar('dir > d:\wang.txt'), 这么写是什么意思

Answer 2

将DOS命令输出结果放入TXT文件中。

Answer 3

怎样才能在DELPHI直接得到DOS命令如DIR的执行结果呢？

Answer 4

用winexec试试看，例如
若d盘已存在输出文件，如wang.txt，则若是用追加输出方式，则
shellexecute(handle,'open','cmd /k dir>d:\wang.txt',nil,nil,sw_shownormal);
若d盘不存在输出文件，如wang.txt，或以覆盖方式输出到该文件，则
shellexecute(handle,'open','cmd /k dir>>d:\wang.txt',nil,nil,sw_shownormal);

Answer 5

补充说明：cmd后面的 /k 是它的参数,有关cmd的具体参数可以在命令行窗口中输入 cmd/?得到详细说明
另外，上面那个做法是基于2000/xp/2003的，至于98/me下面可以考虑把cmd换作command试一试，不过我没试过

Answer 6

若d盘已存在输出文件，如wang.txt，则若是用追加输出方式，则
shellexecute(handle,'open','cmd /k dir>d:\wang.txt',nil,nil,sw_shownormal);
若d盘不存在输出文件，如wang.txt，或以覆盖方式输出到该文件，则
shellexecute(handle,'open','cmd /k dir>>d:\wang.txt',nil,nil,sw_shownormal);