起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 302|回复: 15

【结贴】有什么方法能在代码中动态修改表格的格式么?**

[复制链接]
发表于 2008-6-17 10:32:23 | 显示全部楼层 |阅读模式
比方说表格的边框粗细,颜色等。不是通过设置属性修改
回复

使用道具 举报

发表于 2008-6-17 10:34:29 | 显示全部楼层
表格文档在运行期间不能动态调整属性。
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-6-17 10:47:18 | 显示全部楼层
那在什么时候可以改?
回复 支持 反对

使用道具 举报

发表于 2008-6-17 11:18:13 | 显示全部楼层
在运行期对表格文档的定义作修改后,需要重新打开文档。
不一定符合楼主的需求
回复 支持 反对

使用道具 举报

发表于 2008-6-17 11:19:49 | 显示全部楼层
更改单元格的值后,需要刷新文档。文档的刷新需要关闭再打开,不支持使用Refresh,代码参考如下:
DocViewSL.Doc.Close;
DocViewSL.OpenView(TDocMode.dmEdit, DocViewSL);

DocView1.DisableAlign;
  try
    if Assigned(DocView1.Doc) then begin
      DocView1.Doc.Close;
      DocView1.Doc.Open(TDocMode.dmEdit, DocView1);
    end;
  finally
    DocView1.EnableAlign;
  end;


1、画线请参考 http://bbs.justep.com/forum.php?mod=viewthread&tid=7451   22楼的代码
2、给单元格赋值,请参考 http://bbs.justep.com/forum.php?mod=viewthread&tid=1861
3、获取字段的值,例如 dsData.DataSet.FieldByName('LR').AsString
4、获取数据集的字段名,http://bbs.justep.com/forum.php?mod=viewthread&tid=4312




刷新表格文档
  docview1.doc.close;
  Tdatasheetarea(TBGWD1(docview1.doc).sheet.areas[0].SubAreas[0] ).Visible := not  Tdatasheetarea(TBGWD1(docview1.doc).sheet.areas[0].SubAreas[0] ).Visible;
  docview1.OpenView(TDocMode.dmEdit) ;



隐藏区域


procedure TMainForm.Button1Click(Sender: TObject);
begin
  docview1.doc.close;
  Tdatasheetarea(TBGWD1(docview1.doc).sheet.areas[0].SubAreas[0] ).Visible := not  Tdatasheetarea(TBGWD1(docview1.doc).sheet.areas[0].SubAreas[0] ).Visible;
  docview1.OpenView(TDocMode.dmEdit) ;
// docview1.Realign    ;

end;
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-6-17 16:43:52 | 显示全部楼层
根据上面的介绍,可以设置了,但是还有问题。我在有数据集数据的格子上修改格子的格式就不起作用。比如设置下面的格子,
TSheetDoc(dvCheciSingle.Doc).Cells[j,3].Color:=Graphics.clBlue;
如果是非数据集数据出现的地方,就可以设置,但是数据集出现的地方就不能。
在什么事件里能够实现,打开数据集数据,表现在表格上之后,再修改表格的样式会起作用呢?
回复 支持 反对

使用道具 举报

发表于 2008-6-17 17:26:42 | 显示全部楼层
打开数据集时,修改数据区域内的单元格会有问题。不一定能定位到你希望的位置。
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-6-17 18:00:26 | 显示全部楼层
最初由 jiahaiming 发布
[B]打开数据集时,修改数据区域内的单元格会有问题。不一定能定位到你希望的位置。 [/B]


现在是我根本无法修改数据集所在的区域,有什么办法解决吗?
回复 支持 反对

使用道具 举报

发表于 2008-6-17 18:09:20 | 显示全部楼层
楼主,你详细描述一下你的业务需求吧。
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-6-18 09:17:58 | 显示全部楼层
最初由 jiahaiming 发布
[B]楼主,你详细描述一下你的业务需求吧。 [/B]

在下面的图中,我想在理论车次发生变化时在其下面划一条粗线,表格中的数据都是从数据集取得的。

未命名.jpg

23.57 KB, 下载次数: 158

回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-7-17 20:30 , Processed in 0.046137 second(s), 18 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表