本文整理自网络，侵删。
//OpenDialog1 多选模式加载大量包含中文名文件会出错。20200114
//后来发现不是上面的问题，我经过2个小时的不断测试发现删除 .dproj 文件重新 打开 dpr 项目文件 ，最终正常。
var i : integer; str:string; tmp:TStringList;begintmp:=TStringList.Create;
FileOpenDialog1.FileTypes.Add.DisplayName := 'All Files'; //所有文件FileOpenDialog1.FileTypes.Add.FileMask := '*.txt';
FileOpenDialog1.Options := FileOpenDialog1.Options + [fdoAllowMultiSelect]; if FileOpenDialog1.Execute then begin MemoFileList.Text:=FileOpenDialog1.Files.Text; //获得所有文件名 GroupBox2.Caption:='文件列表数'+IntToStr(MemoFileList.Lines.Count);
end; 相关阅读 >>
Delphi中组件label、edit、tag、memo、richedit
Delphi timagelist 中使用 透明 png 图标
更多相关阅读请进入《Delphi》频道 >>
