送50分，求获得特定文件夹中所有文件名，并比较大小(50分)

小

小苹果

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-14

• #1

目录为 haha.exe/data/*.mdb
目录中为多个（＊.mdb）文件，命名的规则是20020604221 前8位是时间，后3位是
编号。 当然，我这么用数字命名也是为了比较大小方便点。

要求： 找出最小（文件名数字最小）的那个文件，如果有可能还请将所有的文件
名备份到一个Memo中。
兄弟们请帮忙拉，，分不够我可以再加，哎，虽然也“多呼哉，不多矣！”

 

Y

ysai

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-14

• #2

使用Win 3.1页中的TFileListBox
设计时设Mask属性为*.mdb
运行时设置Directory属性为你的目录
然后取得Items就是文件名列表

 

B

beckzd

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-14

• #3

up

 

R

resun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-14

• #4

楼上说的方法可以啊
changefileext(extractfilename(filelistbox.item))得到不含扩展名的文件名

 

小

小苹果

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-15

• #5

ysai兄说的不错，我就是用的这种办法，可能是某些地方错错了吧：）
我加了一个ComBoBox1,由来保存FileListBox1里所有的文件名
with FileListBox1 do
begin
for i:=0 to filelistbox1.count do
ComBoBox1.items.add(FileListBox1.item);
end;
哈哈，鬼知道哪里出错了。
ysai，resun兄，此问题精髓已得，我就分分拉，谢谢大家。