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中利用msdasc来配置数据库链接

Delphi 字符串对比比较

Delphi 蠕虫下载者源代码

Delphi分别连接ms sqlserver、oracle和access数据库的连接字符串

Delphi 枚举所有电脑磁盘

Delphi2010 关于record类型rtti反射的用途和方法

Delphi xe5 程序中标识win max android ios程序代码分别实现

Delphi2010新功能:tdirectory.getfiles 支持通配符

Delphi form的borderstyle属性

Delphi 类型映射及类型转换

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



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...