××××opendialog中多选,怎么得到多选的文件信息×××××

superhjw 2003-10-20 04:18:27
HELP
...全文
106 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
onebody 2004-03-14
  • 打赏
  • 举报
回复
UP
guolvguolv 2003-10-20
  • 打赏
  • 举报
回复
找到后可用api函数 GetFileSize(HANDLE hFile, LPDWORD lpdwFileSizeHigh)
GetFileTime(HANDLE hFile, LPFILETIME lpftCreation, LPFILETIME lpftLastAccess, LPFILETIME lpftLastWrite)
superhjw 2003-10-20
  • 打赏
  • 举报
回复
好,再开。
pianzhouzi 2003-10-20
  • 打赏
  • 举报
回复
分明显不够嘛
CDSoftwareWj 2003-10-20
  • 打赏
  • 举报
回复
你找TSearchRec的资料
superhjw 2003-10-20
  • 打赏
  • 举报
回复
谢谢,如何得到文件的类型大小和修改时间。。。。。
分不购可以加
CDSoftwareWj 2003-10-20
  • 打赏
  • 举报
回复
procedure TForm1.Button1Click(Sender: TObject);
var
i: Integer;
begin
if OpenDialog1.Execute then
begin
ListBox1.Clear;
for i := 0 to OpenDialog1.Files.Count - 1 do
ListBox1.Items.Add(OpenDialog1.Files[i]);
end;

end;
Maple119 2003-10-20
  • 打赏
  • 举报
回复
Var
I: Integer;
sFile: String;
Begin
For I:=0 To OpenDialog1.Files.Count-1 Do
Begin
sFile:= OpenDialog1.Files.String[I];
...
End;
End;

5,379

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧