Delphi把excel内容转换成HTML格式，将Excel表存入到html中的实例源码，后边会附上源码下载地址，转换过程可参考以下代码： 　　ifEdit1.Text''then 　　begin 　　ExApph:=CreateOLEObject('Excel.Application'); 　　ExApph.visible:=True; 　　ExApph.WorkBooks.Open(Edit1.Text); 　　ExApph.ActiveWorkbook.SaveAs(Extractfilepath(Application.ExeName)'mm.htm