本文整理自网络，侵删。
//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 使用 {$include} 或 {$i} 指令管理和调用自定义函数
Delphi 读取图像文件base64编码加载到image组件显示图片
Delphi net.httpclient用最精简的代码获取网页数据
更多相关阅读请进入《Delphi》频道 >>
