在Delphi中,遍歷文件夾中的文件可以使用TDirectory類的靜態(tài)方法GetFiles,它返回一個(gè)字符串?dāng)?shù)組,包含指定文件夾中的所有文件的完整路徑。以下是一個(gè)示例:
uses
System.IOUtils;
procedure TraverseFolder(const AFolder: string);
var
Files: TArray<string>;
FileName: string;
begin
Files := TDirectory.GetFiles(AFolder);
for FileName in Files do
begin
// 處理文件
ShowMessage(FileName);
end;
end;
你可以調(diào)用TraverseFolder過程,傳入要遍歷的文件夾路徑作為參數(shù),然后在for循環(huán)中處理每個(gè)文件的邏輯。在上面的示例中,每個(gè)文件的完整路徑會(huì)通過ShowMessage函數(shù)彈出一個(gè)消息框顯示出來,你可以根據(jù)需要修改為自己的處理邏輯。