要遍历的是两种类型的文件咋写?
本帖最后由 冥界3大法王 于 2024-9-24 12:12 编辑uses
IOUtils, Types;
procedure TForm8.再试遍历指定文件夹Click(Sender: TObject);
var
files: TStringDynArray;
str: string;
begin
files := TDirectory.GetFiles('X:\Tools', '*.exe|*.lnk', TSearchOption.soAllDirectories);
for str in files do
ShowMessage(str);
end; hahatata 发表于 2024-9-24 17:04
谢谢。。
大姐,这是错的代码,
这是求助。
还谢谢? 居然还能看到Delphi。。。 files := TDirectory.GetFiles('X:\Tools', '*.', TSearchOption.soAllDirectories); lies2014 发表于 2024-9-25 17:50
files := TDirectory.GetFiles('X:\Tools', '*.', TSearchOption.soAllDirectories);
@lies2014
牛逼, 这是怎么查出来的?
球方法和窍门? 冥界3大法王 发表于 2024-9-26 17:20
@lies2014
牛逼, 这是怎么查出来的?
球方法和窍门?
看 Lazarus 的代码试出来的:lol
可惜这个通配符不能用正则
lies2014 发表于 2024-9-26 19:31
看 Lazarus 的代码试出来的
可惜这个通配符不能用正则
果然修炼的成精了。。。这都能试出来。。。牛拜。。帮助找了半天也没找到对应的在哪?
页:
[1]