ExcelFile(100分)

各位大虾:
请看下面的程序:
Try
ExcelFile := CreateOleObject(Excel_ID);
ExcelFile.Visible := true;
ExcelFile.WorkBooks.Add;
Except
Application.MessageBox(PChar('启动 Excel 时发生错误!'#13'无法将资料投入Excel!'),PChar('警告'),MB_ICONWARNING+MB_OK);
exit;
End;

ExcelFile.Cells[1,1].value := s_title;

With Dataset do begin
First
// 列印选取的栏位名称:
for i := 0 to High(PField) do ExcelFile.Cells[3,i+1].value := Fields[PField].DisplayLabel;
// 列印出所选栏位的所有记录:
for i := 0 to RecordCount - 1 do begin
for j := 0 to High(PField) do
ExcelFile.Cells[i+4,j+1].value := Fields[PField[j]].asstring;
Next;
end;
end;
目的是将表格数据写入EXCEL文件,一般情况都没问题,但如果某一列字段为字符型数据且字段长度有
十多位的情况下(如:'12234456785554433323')在EXCEL 中显示为1.22345E+19,不知如何解决,
应该设置EXCEL中的单元格格式,但不知如何做,或其他方法,请高手指点.在线等待.

这个问题我也遇到过，其实很简单。
你有没有从SQL SERVER中导出数据到EXCEL中过
如果是从SQL SERVER中导出来的数据不管它有多少们都不会出瑞上面的情况，原因就是它在
每个字段前加了个单引号而这个单引号在显示数据时是看不到的，所以一切就解决了

我已经用过了效果还很不错。