Delphi-如何获取目录中所有文件的列表

我正在使用 delphi，当我执行 openpicturedialog 时，我想要一个目录中所有文件的列表。

即，当执行打开对话框时并且 我从中选择一个文件，我想要 目录中所有文件的列表 所选文件的。

您甚至可以建议我从中获取目录名称FileName的财产TOpenDialog
谢谢。

如果你使用delphi 2010那么你可以使用tdirectory.getfiles 首先将 ioutils.pas 添加到 using 子句，然后在事件处理程序中编写以下代码行（除了该事件处理程序中已有的代码之外）

uses IOUtils;

 var
    path : string;
begin
    for Path in TDirectory.GetFiles(OpenPictureDialog1.filename)  do
        Listbox1.Items.Add(Path);{assuming OpenPictureDialog1 is the name you gave to your OpenPictureDialog control}
end;