关于OpenDialog1控件问题！！！

Question

我打开了多个文件，我想分别显示我打开的文件名和路径。
如果我在对话框中选取的是取消按钮
则退出这个过程操作

Answer 1

用 ExtractFileName, ExtractFileDir, 可分開你的文件名與路徑;
>>如果我在对话框中选取的是取消按钮
>>则退出这个过程操作
 if not OpenDialog1.Execute then exit;

Answer 2

if opendialog1.execute then
begin
  showmessage(extractfilename(opendialog1.filename));
  showmessage(extractfiledir(opendialog1.filename));
end;

Answer 3

if opendialog1.execute then
  begin
   ...
   ...
  end
else
  ...   //按的是“取消”

Answer 4

我一般都是这样的：if opendialog1.execute then
  sfilename:=opendialog1.filename;if sfilename='' then exit;

Answer 5

不知道楼上的意思是不是这样的，用opendialog打开多个文件，点取消可以退出，然后知道所有文件的路径，我写了个简单例子，你看看，加了一个button，为了方便显示路径，用了一个memo，opendialog的filter的options里面设置允许多选，代码如下：
   procedure TForm1.Button1Click(Sender: TObject);
var i:integer;
begin
  if opendialog1.Execute then
      begin
         for i:=0 to opendialog1.files.Count-1 do   
         memo1.Lines.Append(opendialog1.Files[i]);
        end;
end;有问题在发帖吧。