RenameFile 的问题

Question

只知道源文件的部分文件名 比如 fd11*.txt,但*部分是什么不确定，请问如何来解决，好像没什么通配符啊。

Answer 1

先用findfirst()、findnext()来查找呀，找到了，然后再改呀
这些函数支持通配符的

Answer 2

findfirst() 没用过，兄弟们给个具体的例子好嘛？需要对多个文件操作

Answer 3

findfirst() 没用过，兄弟们给个具体的例子好嘛？需要对多个文件操作

Answer 4

//将"C:\top\"下的所有*.txt文件导到listbox项目里.
procedure TForm1.Button1Click(Sender: TObject);
var
 SearchRec:tSearchRec;
 FindResult:integer;
begin
FindResult := FindFirst('C:\top\'+ '*.txt',FaAnyFile,SearchRec);
while findresult=0 do
begin
   listbox1.items.Add(SearchRec.Name);
   FindResult :=findnext(Searchrec);
end;
FindClose(Searchrec);
end;