Delphi 文件夹操作：添加文件实例