扩展实例18 创建和删除文件夹 ...........................\DIRS.dof ...........................\DIRS.DPR ...........................\DIRS.exe ...........................\DIRS.res ...........................\DirsForm.ddp ...........................\DirsForm.dfm ...........................\DirsForm.pas