Excel画网格线的问题，Up有分！！(100分)

一下是画网格线的代码：
{
xlEdgeLeft = 7;
xlEdgeRight = 10;
xlEdgeTop = 8;
xlEdgeBottom = 9;
xlInsideHorizontal = 12;
xlInsideVertical = 11;
}
//设置报表网格线
for iCounter:=7 to 12 do
FExcel.ActiveSheet.Range
[
FExcel.Cells[StartLine,1],
FExcel.Cells[StartLine+FContentDataSet.RecordCount-1,FContentDataSet.FieldCount+1]
].Borders[iCounter].LineStyle:=1;
这段代码在Excel的几个工作薄中可以正确的画出，但其中一个workSheet的时候会出现“
不能设置类border的LineStyle属性”的错误。而这个错误是在iCounter值为12即画网格的水平线
(xlInsideHorizontal)时出现的,但在其他工作薄上都正常，可以画出，找了很久也未发现其因。
有劳大家帮忙了，tks.

你的 FContentDataSet.RecordCount 可能不大于1，
12表示的是 内部水平线，可能内部水平线不存在。
我是猜的，因为我没出现过这样的问题。

可以把 FContentDataSet.RecordCount 写成 2,3,...试试看。

UP

真如jsxjd所说的，数据集中只有一条记录才出现这个错误，

不知有何良策改进一下呢？总不能添加一条空记录吧。
再次感谢.

接受答案了.