请问怎么样才可以得到一个固定目录下的后缀名固定的文件的列表呢?(50分)

衫

衫菜

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-28

• #1

比方说我要得到我的程序目录下的*.GFZ的文件的文件名的列表,我该怎么操作?

 

T

tan_jian

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-28

• #2

findFirst findenext

 

A

aizb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-28

• #3

用FindFirst,FindNext,FindClose三个函数,具体用法在我的主页上有相关的例程:

一个文件夹文件列表的控件

地址:http://aizb.6to23.com

 

完

完颜康

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-28

• #4

win31页上的倥件，点点就可以了，

 

P

PFans

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-28

• #5

procedure TForm1.Button1Click(Sender: TObject);
var
i,tag:integer;
rec:TSearchRec;
ExtNames:TStrings;
begin
ExtNames:=TStringList.Create;
i:=FindFirst('*.GFZ',faAnyFile,rec);
tag:=0;
while i=0 do
begin
ExtNames.Add(rec.name);
memo1.Lines.Add(ExtNames[tag]);
i:=FindNext(Rec);
inc(tag);
end;
FindClose(rec);
end;

 

衫

衫菜

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-28

• #6

果然可以做到,可是请问我怎么样在FINDFIRST中指定需要寻找的目录呢?

 

衫

衫菜

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-28

• #7

多人接受答案了。