delphi OpenDialog1 添加文件打开多选模式

本文整理自网络，侵删。

 
opendialog1.Options:=opendialog1.Options+[ofAllowMultiSelect]; //打开文件多选模式
if OpenDialog1.Execute() then
begin
Memo_Attachment.Lines.AddStrings(opendialog1.Files);//添加多个文件
//Memo_Attachment.Lines.Add(OpenDialog1.FileName); //添加单个文件

Label10.Caption:='附件数:'+inttostr(opendialog1.Files.Count)+'个';
end;
 

相关阅读 >>

Delphi 通过进程名获得文件全路径的函数

Delphi与汇编杂谈

Delphi删除文件和文件夹

Delphi 关闭xp保护 替换explorer.exe

Delphi中模拟鼠标点击事件

Delphi xe2-firemonkey 新功能

Delphi 遍历文件单元文件

Delphi 全局变量 hinstance 到底是在什么时候赋值的?

Delphi 获取文件夹下包括子目录所有文件

Delphi 判断端口(port)是否被占用

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi OpenDialog1 添加文件打开多选模式