4个回答
展开全部
这是个相对简单的方法,不知道能不能帮到你
删除:
procedure TForm1.Button1Click(Sender: TObject);
begin
deletefile('c:\123.txt');
end;
复制:
procedure TForm1.Button1Click(Sender: TObject);
begin
copyfile('c:\123.txt','d:\123.txt',false); //第一个参数是你要复制的文件,第二个是复制到哪
// 个目录下,false是 如果存在,则覆盖
end;
剪切的话,可以把两段代码合并,先复制、再删除
删除:
procedure TForm1.Button1Click(Sender: TObject);
begin
deletefile('c:\123.txt');
end;
复制:
procedure TForm1.Button1Click(Sender: TObject);
begin
copyfile('c:\123.txt','d:\123.txt',false); //第一个参数是你要复制的文件,第二个是复制到哪
// 个目录下,false是 如果存在,则覆盖
end;
剪切的话,可以把两段代码合并,先复制、再删除
展开全部
删除文件使用DeleteFile('c:\123.txt')
复制文件和剪切文件使用Clipbrd
复制文件和剪切文件使用Clipbrd
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
SysUtils下有个Deletefile
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
没有分,不干活
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询