本文整理自网络，侵删。
//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 如何把一个exe做为res加入到dll中，并在运行时生成exe文件执行
Delphi 正则表达式tperlregex 类的属性与方法
更多相关阅读请进入《Delphi》频道 >>
