冥界3大法王 发表于 2024-9-24 12:09

要遍历的是两种类型的文件咋写?

本帖最后由 冥界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;

冥界3大法王 发表于 2024-9-24 17:18

hahatata 发表于 2024-9-24 17:04
谢谢。。

大姐,这是错的代码,
这是求助。
还谢谢?

你好,再见 发表于 2024-9-24 19:12

居然还能看到Delphi。。。

lies2014 发表于 2024-9-25 17:50

files := TDirectory.GetFiles('X:\Tools', '*.', TSearchOption.soAllDirectories);

冥界3大法王 发表于 2024-9-26 17:20

lies2014 发表于 2024-9-25 17:50
files := TDirectory.GetFiles('X:\Tools', '*.', TSearchOption.soAllDirectories);

@lies2014
牛逼, 这是怎么查出来的?
球方法和窍门?

lies2014 发表于 2024-9-26 19:31

冥界3大法王 发表于 2024-9-26 17:20
@lies2014
牛逼, 这是怎么查出来的?
球方法和窍门?

看 Lazarus 的代码试出来的:lol
可惜这个通配符不能用正则

冥界3大法王 发表于 2024-9-26 19:51

lies2014 发表于 2024-9-26 19:31
看 Lazarus 的代码试出来的
可惜这个通配符不能用正则

果然修炼的成精了。。。这都能试出来。。。牛拜。。帮助找了半天也没找到对应的在哪?
页: [1]
查看完整版本: 要遍历的是两种类型的文件咋写?