如何调用DOS的Copy命令将多个文本文件和并成为一个文件? ( 积分: 200 )

  • 主题发起人 主题发起人 swean_98
  • 开始时间 开始时间
S

swean_98

Unregistered / Unconfirmed
GUEST, unregistred user!
如题!需要实现如Copy&nbsp;A.text+B.Text&nbsp;c.txt的效果。<br>原来实用Stringlist实现的,可是文件比较大,文件量也比较多,实现速度相比较DOS的Copy命令比较慢,哪位高人指点一下!
 
哇,搞定了,给分吧<br>uses&nbsp;shellApi;<br>procedure&nbsp;TForm1.Button1Click(Sender:&nbsp;TObject);<br>var<br>&nbsp;&nbsp;cmd:&nbsp;string;<br>begin<br>&nbsp;&nbsp;cmd:=&nbsp;'Copy&nbsp;a.txt+b.txt&nbsp;c.txt';<br>&nbsp;&nbsp;ShellExecute(0,pchar('open'),pchar('cmd.exe'),&nbsp;pchar('/k'+&nbsp;cmd),nil,SW_hide);<br>end;
 
接受答案了.
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
后退
顶部