vclzip怎么压缩指定子目录？

Question

现在有路径：
   path:= 'D:\Output\Try\MyDir\*.*';采用vclzip压缩，
   ziper.RelativePaths:=true;       //是否保持目录结构
   ziper.RecreateDirs:=true;        //创建目录  
   ziper.FilesList.Add(UnzipDir+'\*.*');  //添加解压缩文件列表
   ziper.Zip;                        //压缩结果生成的zip文件，每个子目录都建了一个文件夹，Output->Try->MyDir...
而我希望生成的zip文件中，只包含MyDir子目录。请问各位高手，该怎么实现？多谢！

Answer 1

   ziper.ZipName := 'd:\a.zip';
   ziper.RootDir := 'D:\Output\Try\';
   ziper.RelativePaths:=true;
   ziper.FilesList.Add('D:\Output\Try\MyDir\*.*');
   ziper.Zip;