起步软件技术论坛-X3

 找回密码
 立即注册
搜索
楼主: snowman

【搞定】[请求]能否用代码影响DOCVIEW中表单某一列或行的宽度?**

[复制链接]
发表于 2007-9-6 12:13:33 | 显示全部楼层
NameSpace: Business.Model    ClassDelcare: Business.Model.TSheetDoc
--------------------------------------------------------------------------------
property ColWidths[Longint]: Longint;
回复 支持 反对

使用道具 举报

发表于 2007-9-6 13:45:21 | 显示全部楼层
1、访问到文档上的DataGrid组件,
参考: http://bbs.justep.com/forum.php?mod=viewthread&tid=17782

2、访问DataGrid 某个列(Column)的宽度,
参考:http://bbs.justep.com/forum.php?mod=viewthread&tid=16279
回复 支持 反对

使用道具 举报

 楼主| 发表于 2007-9-6 14:52:51 | 显示全部楼层
我写了以下代码,编译通过,
但运行的时候提示错误,
然后datagrid的效果没有改变

procedure TJJD.BizFormCreate(Sender: TObject);
var
   i: integer;
begin
     for i:=0 to JJDXX.TJJD(DocviewJJDXX_JJD).DataGrid1.ColumnCount-1 do
     begin
          JJDXX.TJJD(DocviewJJDXX_JJD).DataGrid1.Columns.Width := 100;
     end;
end;

Pic_029.jpg

18.67 KB, 下载次数: 71

回复 支持 反对

使用道具 举报

 楼主| 发表于 2007-9-6 16:25:25 | 显示全部楼层
13楼的错误是因为什么呢?
等待答复

这几行代码编译是通过的
注释掉就不提示错误了
添加就会提示错误
回复 支持 反对

使用道具 举报

发表于 2007-9-6 16:41:29 | 显示全部楼层
DocviewJJDXX_JJD改成DocviewJJDXX_JJD.Doc
回复 支持 反对

使用道具 举报

 楼主| 发表于 2007-9-6 17:12:31 | 显示全部楼层
不好意思,看漏了
13楼的问题已经解决,谢谢了
回复 支持 反对

使用道具 举报

发表于 2007-9-6 17:17:31 | 显示全部楼层
恩,已经ok了?
回复 支持 反对

使用道具 举报

 楼主| 发表于 2007-9-6 17:50:52 | 显示全部楼层
但我的最终目的如图二
即通过调整图三中椭圆图案圈中的行和列
任何时候都不允许出现图一右边的空白

图三中椭圆图案圈中的行和列怎么用代码表示?

Pic_02600.jpg

72.94 KB, 下载次数: 60

回复 支持 反对

使用道具 举报

 楼主| 发表于 2007-9-6 17:52:35 | 显示全部楼层
11楼是18楼的解决方法吗?
我看不明白
回复 支持 反对

使用道具 举报

发表于 2007-9-6 17:58:54 | 显示全部楼层
不是,11楼给的是处理文档的DataGrid中某列,
如果是直接设置表格的话,参考
http://bbs.justep.com/forum.php?mod=viewthread&tid=1944
回复 支持 反对

使用道具 举报

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

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-1-15 23:20 , Processed in 0.038819 second(s), 15 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

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