Delphi OpenDialog1 打开多个文件

本文整理自网络，侵删。

 
代码演示：






设置一个小参数：


var
  i : integer;
begin
  if OpenDialog1.Execute then
  begin
    for  i := 0 to OpenDialog1.Files.Count-1 do
    begin
    Memo1.Lines.Add(OpenDialog1.Files[i]) ;
    end;

  end;
 

相关阅读 >>

Delphi & c++ 安卓使用权限

Delphi-idhttp-utf-8编码乱码解决

Delphi 10.4 新变化：定制拖管记录（结构）类型

Delphi image 图像清空

Delphi xe10 麦克风、摄像头操作

Delphi 获取系统mydocuments文件夹路径

Delphi 选择一张照片，让照片缩略图显示在图片控件中间

关于公历与农历换算和时间处理的单元 calendar.pas

Delphi开发平台 raw socket

Delphi xe 取得 app 自己的版本号 (狠跨 4 个平台)

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

转载请注明出处：木庄网络博客 » Delphi OpenDialog1 打开多个文件