一个打开对话框的操作

我在程序中调用了一个打开对话框的操作  
  od1:   TOpenDialog;  
  并把   ofAllowMultiSelect设置为TRUE；  
  但是在我调试程序却发现，我选中的三个文件，  
  然而OD1.FILENAME值却只有一个文件；  
  错误何在？  
   
  比如：我在打开对话框中选择了file1.txt,file2.txt  
  file3.txt所选目录是c:\myfolder  
  而返回的OD1.FILENAME值只有c:\myfolder\file1.txt;  
  错误何在？  
   
  我知道正确效果应该是c:\myfolder\file1.txt   file2.txt   file3.txt  
  但我不知道错在哪里，望指教？ 问题点数：0、回复次数：8Top

1 楼allan2002（丸子）回复于 2002-12-02 08:54:30 得分 0

你用opendialog1.Files.Text试一试！！肯定可以！Top

2 楼CloneCenter（复制中心）回复于 2002-12-02 09:58:24 得分 0

Returns   a   list   of   the   selected   file   names  
  OpenDialog.Files       是一个   TStringList   的列表；Top

3 楼sliping（游戏人生）回复于 2002-12-02 10:42:45 得分 0

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

4 楼crossbow（【以无形为形】）回复于 2002-12-03 20:37:31 得分 0

来晚了,   Shit!Top

5 楼ikumei（雷欧纳德·布莱特）回复于 2002-12-04 16:26:24 得分 0

是的，当选中多个文件时，返回的是一个字符串列表  
  遍历整个列表可以得到被选中的所有文件的文件名Top

6 楼ikumei（雷欧纳德·布莱特）回复于 2002-12-04 16:29:55 得分 0

有关TStrings以及TStringList等，包括TOpendialog本身的更多信息，请查看borland自带的帮助文件，非常有帮助Top

7 楼DelUser（探索者）回复于 2002-12-04 16:46:14 得分 0

crossbow(La   Vida   Es   Amor)    
   
  没有什么晚不晚的，来这里是大家共同学习的，要分可以换钱吗！  
  Top

8 楼DelUser（探索者）回复于 2002-12-04 16:47:06 得分 0

解决问题才是最重要的！Top

相关问题

• 文件
• opendialog
• 打开对话框
• myfolder
• 列表
• od
• txt

• 帖主：visual_cjiajia

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