高手关于Excel表格数据自动保存和指定文件夹删除的有关问题,谢谢

请教各位高手关于Excel表格数据自动保存和指定文件夹删除的问题,多谢!
问题一:
现在我已经实现数据生成并导出到Excel表格,如何用Delphi语句实现该Excel表格的自动保存?比如我在combobox中选择20140214,则该Excel表格保存为:20140214.xls,非常感谢!
问题二:
如何用Delphi语句实现指定文件夹下的全部内容(包括其中的文件夹和文件等)的删除?
再次感谢各位的大力支持!
------解决方案--------------------
 var
  EApp:variant;
begin
  if FileExists(DM.workPath+'明细报价单'+cxDBTextEdit1.text+'.xls') then
    deletefile(DM.workPath+'明细报价单'+cxDBTextEdit1.text+'.xls');
  EApp:=CreateOleObject('Excel.application');
  EApp.workbooks.open(DM.workPath+'明细报价单.xls');
  EApp.ActiveWorkBook.SaveAs(DM.workPath+'明细报价单'+cxDBTextEdit1.text+'.xls');
  EApp.workbooks.open(DM.workPath+'明细报价单'+cxDBTextEdit1.text+'.xls');
  //报价单号

你参考一下，我之前做的一段程序