将懒进行到低，谁会编写*.bat文件吗？我想将以下实现的内容写成*.bat文件 [删除文件操作] ( 积分: 20 )

C

colonel

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-05

• #1

目的是只改变目录列表各扩展名列表，跟据这两个列表去删除文件
Const
DirList = Array [0..1]of string = ('abc', 'aaa');//目录列表
AttrList = Array [0..1]of String = ('*.~*', '*.dcu');//扩展名列表
FileStr = '%s/%s';
var
i,j:Integer;
begin
for i:=Low(Dirlist) to High(Dirlist) do
for j:=Low(AttrList) to High(AttrList) do
deletefile( format(FileStr), [ Dirlist, AttrList[j] ] );//作删除文件操作
end;

 

C

colonel

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-05

• #2

目的是只改变目录列表各扩展名列表，跟据这两个列表去删除文件
Const
DirList = Array [0..1]of string = ('abc', 'aaa');//目录列表
AttrList = Array [0..1]of String = ('*.~*', '*.dcu');//扩展名列表
FileStr = '%s/%s';
var
i,j:Integer;
begin
for i:=Low(Dirlist) to High(Dirlist) do
for j:=Low(AttrList) to High(AttrList) do
deletefile( format(FileStr), [ Dirlist, AttrList[j] ] );//作删除文件操作
end;

 

T

TYZhang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-07

• #3

delete ./abc/*.~*
delete ./abc/*.dcu
delete ./aaa/*.~*
delete ./aaa/*.dcu

 

C

colonel

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-07

• #4

这个我知道，这样不好呀，有多个目录要删除同样的文件，要偷偷懒^_^

 

T

TYZhang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-07

• #5

del *.~* /s
del *.dcu /s

 

刘

刘麻子

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-07

• #6

给你看看我的DelTemp.bat []

del *.cfg /s
del *.dof /s
del *.ddp /s
del *.~ddp /s
del *.~dpr /s
del *.~pas /s
del *.~dfm /s
del *.dcu /s

 

C

colonel

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-07

• #7

你们的都是W2K吗？我98里没有/s这个参数.....................

 

刘

刘麻子

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-07

• #8

那就用 deltree 我记得是这个

 

C

colonel

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-08

• #9

deltree 这个可是删除目录的.........

 

W

weiliu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-08

• #10

如果在98下还是用DELPHI的FINDFIRST/FINDNEXT编一个吧，
DELTREE 虽然可删除目录也可删除文件，但子目录里的文件还是要一个个删的，不能自动。

 

嫁

嫁给cpu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-08

• #11

最强的就是format /q/s

 

G

gangp

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-08

• #12

gexperts就有清理文件的专家，真正的懒人是应该用工具的，嘻嘻。

 

C

colonel

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-08

• #13

我参照网上的资料写了这个批处理，但照着写都还是不行....
for /r %%c in (*.txt) do del %%c

 

C

colonel

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-08

• #14

多人接受答案了。