Delphi调用Excel设置单元格的格式

在做设计过程中，需要把数据内容导入到Excel中，可是每次导入EXcel之后，总有一些数据不能正常显示，比如'123456789012'显示为科学技术形式'1.23457E+11’，还有以'0’开头的数据总会把0撇开再显示。

在VB中好像这么更改Excel更改单元格式：
Worksheets("Sheet1").Range("A17").NumberFormat = "General"      //对A17 单元格格式进行设置
Worksheets("Sheet1").Rows(1).NumberFormat = "hh:mm:ss"             //对第一行格式进行设置。
Worksheets("Sheet1").Columns("C"). NumberFormat = "$#,##0.00_);[Red]($#,##0.00)"    //对数字格式进行设置。

我需要的是把第一列的格式设置从数字类型转换成文本类型的：

转换方法如下： WorkSheet[1].Columns[2].NumberFormatlocal := '@'

 

有了这个，其他格式的转化方法还不手到擒来，呵呵。