tangyongbo 发表于 2013-2-20 11:25:39

关于用代码画表格的问题

   我现在有一个统计表格比较复杂(涉及到列的动态扩展和单元格的动态合并),所以我现在正在试验用代码自己画sheetdoc,可以用代码显示文字以你改变单元格的颜色,但是边框颜色一直都变不了,请帮我看看我的代码有什么问题:

TSheetDoc(DocView1.doc).Sheet.Cells.AsString := 'abc';
TSheetDoc(DocView1.doc).Sheet.ColWidths:=120;
TSheetDoc(DocView1.doc).Sheet.Cells.Color:= Graphics.clRed;
TSheetDoc(DocView1.doc).Sheet.Cells.Border.Color:=Graphics.clBlack;
TSheetDoc(DocView1.doc).Sheet.Cells.Border.Line:=TCellSideLine.slDouble;
DocView1.Doc.Close;
DocView1.Doc.Open(TDocMode.dmEdit, DocView1);
    再有就是请问有没有关于用代码操作SheetDoc的一些代码或者是例子能让我借鉴借鉴吗?

tangyongbo 发表于 2013-2-20 11:48:00

前面提的那个问题已经知道原因了,只要把
TSheetDoc(DocView1.doc).Sheet.Cells.Border.Line:=TCellSideLine.slDouble;改成
TSheetDoc(DocView1.doc).Sheet.Cells.Sides:=TSheetDoc(DocView1.doc).Sheet.Cells.Sides+;就可以了,但是边框颜色没办法改变,还有就是前面说的有没有有关的例子或者代码能让我借鉴一下吗?

didi0225 发表于 2013-6-8 11:13:52

:lol:lol 好像不行
页: [1]
查看完整版本: 关于用代码画表格的问题