CSDN首页 空间 新闻 论坛 Blog 下载 读书 网摘 搜索 .NET Java 视频 接项目 求职 在线学习 买书 程序员 通知
不看会后悔的Windows XP之经验谈 简单快捷DIY实用家庭影院
CSDN社区
搜索 收藏 打印 关闭
CSDN社区 >  Delphi >  非技术区

关于opendialog问题

楼主qyyok()2003-06-02 18:46:31 在 Delphi / 非技术区 提问

怎样把一文件夹的文件一次读入到listbox,不打开文件夹! 问题点数:0、回复次数:5Top

1 楼lion_lh(xmanx)回复于 2003-06-03 09:53:36 得分 0

var  
          SearchRec:   TSearchRec;  
      begin  
          if   FindFirst('C:\*.*',   faAnyFile,   SearchRec)   =   0   then  
          begin  
              repeat  
                listbox1.Items.Add(SearchRec.Name);  
              until   FindNext(SearchRec)   <>   0;  
              FindClose(SearchRec);  
          end;  
      end;Top

2 楼csdmzw(伟)回复于 2003-06-04 00:38:52 得分 0

ListView   结合   listboxTop

3 楼nuaabestbo(superbo)回复于 2003-06-04 22:56:21 得分 0

listbox1.Items:=opendialog1.FilesTop

4 楼nuaabestbo(superbo)回复于 2003-06-05 16:44:20 得分 0

opendialog1.Options:=[ofAllowMultiSelect];  
  if   opendialog1.Execute   then  
      listbox1.Items.Assign(opendialog1.files);Top

5 楼wangzn1979(梦郎2003)回复于 2003-06-05 18:13:06 得分 0

强人多啊!Top

相关问题

  • 关于OpenDialog
  • 关于opendialog!
  • 关于OpenDialog
  • 关于OPENDIALOG问题
  • opendialog问题请教
  • OpenDialog打开文件
  • 关于opendialog的问题
  • OPENDIALOG 的一个小问题
  • OpenDialog的简单问题?
  • opendialog 修改默认路径

关键词

  • 文件夹
  • opendialog
  • searchrec
  • listbox
  • items
  • begin
  • then

得分解答快速导航

  • 帖主:qyyok

相关链接

  • Delphi类图书
  • Delphi类源码下载
  • Delphi控件下载

广告也精彩

反馈

请通过下述方式给我们反馈
反馈
提问
网站简介|广告服务|VIP资费标准|银行汇款帐号|网站地图|帮助|联系方式|诚聘英才|English|问题报告
北京创新乐知广告有限公司 版权所有, 京 ICP 证 070598 号
世纪乐知(北京)网络技术有限公司 提供技术支持
Copyright © 2000-2008, CSDN.NET, All Rights Reserved
GongshangLogo