| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1182 人关注过本帖
标题:[求助]关于AddColumn 方法使用的示例
取消只看楼主 加入收藏
YILANG
Rank: 1
等 级:新手上路
帖 子:14
专家分:0
注 册:2007-5-9
收藏
 问题点数:0 回复次数:2 
[求助]关于AddColumn 方法使用的示例

下面是这段代码,作用是要添加一个新列, 然后为该列指定一个新的名字。红色部分是我看不懂的地方!
疑问是“THISFORM.Grid1.ColumnCount”返回值应是表格总的数目,那么“NAME属性”更改的也应是最后一个列。
可是运行后更改的是新加的一列。
请各位指教!!!!
为此我还专门做了一实验:建立一个表单,添加一个表格控件和一个命令按钮控件,命令按钮代码如下。

THISFORM.Grid1.AddColumn(1) && Insert column at left.
THISFORM.Grid1.Columns(THISFORM.Grid1.ColumnCount).Name = "NewColumn"
THISFORM.Grid1.NewColumn.ControlSource = "Customer.CustID"

命令按钮代码:
MESSAGEBOX("添加前的列数:"+ALLTRIM(STR(THISFORM.Grid1.ColumnCount)))&&显示为5列
THISFORM.Grid1.AddColumn(1) && Insert column at left.
MESSAGEBOX("添加后的列数:"+ALLTRIM(STR(THISFORM.Grid1.ColumnCount)))&&显示为6列

THISFORM.Grid1.Columns(THISFORM.Grid1.ColumnCount).Name = "NewColumn"
THISFORM.Grid1.Columns(THISFORM.Grid1.ColumnCount).header1.caption = "■■■"&&新列的标题
THISFORM.Refresh
MESSAGEBOX("刷新后的列数:"+ALLTRIM(STR(THISFORM.Grid1.ColumnCount)))&&好象没执行

搜索更多相关主题的帖子: 示例 AddColumn 
2007-05-17 00:18
YILANG
Rank: 1
等 级:新手上路
帖 子:14
专家分:0
注 册:2007-5-9
收藏
得分:0 

正如你说的,我又把实验代码做了一下,果然如你说的,运行后新列在表格中显示为加在了指定列的前面,但新列的COLUMNORDER属性为最后一列加1,但按照中文帮助手册的说明,可不象我们想象的那样,也不符合事实,难到是帮助手册写错了,或翻译错了!!!
“调用 AddColum() 时, 已存在的列向右移动, 它们的 ColumnOrder 属性依次递增。表格的 ColumnCount 属性也加一。
表格的控件属性数组扩大一个元素, 一个新列的引用放入新元素中。新列被分配一个唯一名。例如, 要添加一个新列, 然后为该列指定一个新的名字, 可按下述方法进行。”
THISFORM.Grid1.AddColumn(1) && Insert column at left.
THISFORM.Grid1.Columns(THISFORM.Grid1.ColumnCount).Name = "NewColumn"
THISFORM.Grid1.NewColumn.ControlSource = "Customer.CustID"


性格决定一个人的命运
2007-05-17 08:56
YILANG
Rank: 1
等 级:新手上路
帖 子:14
专家分:0
注 册:2007-5-9
收藏
得分:0 
TO songyuyu
我已经把中文手册发给你了,请你尽快查收,并在搜索中查找“ADDCOLUMN”然后查看这段说明,看看有没有问题!!!谢谢!!

性格决定一个人的命运
2007-05-17 08:58
快速回复:[求助]关于AddColumn 方法使用的示例
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.057171 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved