起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 338|回复: 13

【搞定】动态创建临时字段,表现形式checkbox**

[复制链接]
发表于 2007-8-6 20:47:57 | 显示全部楼层 |阅读模式
procedure TBD_LCSWFQ.Button2Click(Sender: TObject);
var
  lField : TBizField;
  lColumn: TDataGridColumn;
begin
  lField := TUserDataField.Create(nil);
  lField.DataSet := InfoBroker.info.DataSets[1];
  lField.ID := 'CS1';
  lField.DataType := TDataType.dtString;
  lField.EditStyleID := 'checkbox';
  lField.DisplayName := 'CS1';
  lColumn := TDataGridColumn(DataGrid2.CreateColumnByClassName('TDataGridColumn'));
  lcolumn.Name:='TDataGridColumn'+'CS1';
  lColumn.FieldName :='CS1';
end;
以上代码??运行报 字段CS1没有找到 错误什么原因???
回复

使用道具 举报

发表于 2007-8-7 08:52:55 | 显示全部楼层
你的DataGrid2对应的数据集中有CS1这个字段吗?
回复 支持 反对

使用道具 举报

 楼主| 发表于 2007-8-7 08:57:22 | 显示全部楼层
没有
字段动态创建成功的,在datagrid2中有显示的,就是报错,字段表现没有??
将表现换成'string',错误就不报了,是不是表现设置成'CheckBox',需要其他设定字段属性的???
回复 支持 反对

使用道具 举报

发表于 2007-8-7 09:30:52 | 显示全部楼层
把 lField := TUserDataField.Create(nil);改成lField := TInternalDataField.Create(nil);
回复 支持 反对

使用道具 举报

 楼主| 发表于 2007-8-7 09:57:40 | 显示全部楼层
问题依旧???
如何解决啊???
请提供处理代码!!!
回复 支持 反对

使用道具 举报

发表于 2007-8-7 10:12:56 | 显示全部楼层
我这里测试没有问题,请把相关资源打包发过来我这边测试一下。
回复 支持 反对

使用道具 举报

 楼主| 发表于 2007-8-7 11:20:28 | 显示全部楼层
请接收

checkbox.rar

1.1 MB, 下载次数: 61

回复 支持 反对

使用道具 举报

 楼主| 发表于 2007-8-7 14:46:29 | 显示全部楼层
人在吗??请下载测试
回复 支持 反对

使用道具 举报

发表于 2007-8-7 15:03:45 | 显示全部楼层
下不下来,楼主
下载了7、8次
回复 支持 反对

使用道具 举报

发表于 2007-8-7 15:07:30 | 显示全部楼层
楼主,我们的网现在有点问题,下载不下来,在悄悄话中发个qq给我,麻烦qq传一下吧。
回复 支持 反对

使用道具 举报

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

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-1-13 17:01 , Processed in 0.053925 second(s), 18 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

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