当用SaveDialog1保存文件时,只能输入文件名,一次保存一个文件, 我现在有很多文件需要保存到 一个目录下, 只要选定该目录,全部文件保存到
该目录下, 该怎样做?

解决方案 »

  1.   

    DirectoryListBox1在哪个面板上?
      

  2.   

    不用DirectoryListBox1是否可以做到
      

  3.   

    我现在有很多文件需要保存到 一个目录下,那么你的这些文件名是怎么分配的?总不能叫一个名吧?还是要一个个输呀
    要是想编号(1,2,3……)那样的话就直接saveto就行了
      

  4.   

    楼主的意思是说,用saveas那样的对话框得到一个路径是吗?
    我也一直想找这个问题的答案。
      

  5.   

    还是要自己写代码搞定!!!!!!!
    savedialog.directorylistbox只是提供操作界面!
      

  6.   

    uses FileCtrl;const
      SELDIRHELP = 1000;
    procedure TForm1.Button1Click(Sender: TObject);
    var
      Dir: string;
    begin
      Dir := 'C:\MYDIR';
      if SelectDirectory(Dir, [sdAllowCreate, sdPerformCreate, sdPrompt],SELDIRHELP) then
        Label1.Caption := Dir;
    end;
      

  7.   

    DirectoryListBox1在win3.1面板上,不过它要配合DriveComboBox一超使用
      

  8.   

    我的想法(我也是这样做的)
    自己写一个组件,从TreeView继承
    通过TsearchRec把目录列表列出来,供选择就行了,这样自由一些