怎样用Delphi运行Dos命令：dir > c:/Dir.txt(100分)

N

Neffpb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-11

• #1

怎样用Delphi运行Dos命令：dir > c:/Dir.txt，是用WinExec函数么？
问题是怎么用？

 

杜

杜宝

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-11

• #2

呵呵，这样就行了！
procedure TForm1.Button1Click(Sender: TObject);
begin
WinExec('Command.com /C Dir *.* > dir1.txt',0);
end;
在2000下通过，98下应该没有问题的。

 

天

天真

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-11

• #3

http://www.delphibbs.com/delphibbs/dispq.asp?lid=781783
这儿去看看，抄的哈！

 

N

Neffpb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-17

• #4

[]谢谢大家！