本文整理自网络，侵删。
//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 每年、月、周、日的开始与结束的时间startofayear … startoftheyear … endofayear … endoftheyear
Delphi防止因系统崩溃而丢失任务栏的图标(重建托盘图标)
Delphi中的copy，delete，pos和leftstr,rightstr的用法
Delphi access violations 问题的解决之道
更多相关阅读请进入《Delphi》频道 >>
