起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 201|回复: 10

【结】主从数据集的问题!

[复制链接]
发表于 2008-7-7 12:30:56 | 显示全部楼层 |阅读模式
主数据集中做一个计算字段,该计算字段显示从数据集某个字段的合计!当从数据集发生变化时主数据集的该计算字段自动更新!
该主数据集有若干条记录,每条记录都显示该计算字段!
var
   count:Integer;
   i : Integer;
   hj : Integer;
begin
   //DataSetXMFYSQSJJ.Open;
   DataSetXMFYSQSJJ.First;
   if (DataSetXMFYSQSJJ.FieldByName('xmbs').AsString=DataSetFYSJSYQKSJJ.FieldByName('xmbs').AsString) and (DataSetXMFYSQSJJ.FieldByName('xh').AsString=DataSetFYSJSYQKSJJ.FieldByName('xh').AsString) then
   begin

       DataSetFYSJSYQKSJJ.Open;
       DataSetFYSJSYQKSJJ.Refresh;

       count := DataSetFYSJSYQKSJJ.RecordCount;
       if count <=0 then
       begin
          hj := 0;
       end;
       DataSetFYSJSYQKSJJ.First;
       for i:=0 to count-1 do
       begin
          hj :=hj + DataSetFYSJSYQKSJJ.FieldByName('SJJE').AsInteger;
          DataSetFYSJSYQKSJJ.Next;
          //Dialogs.ShowMessage(tempstr);
       end;

       Value := hj;
   end;
   if (DataSetXMFYSQSJJ.FieldByName('xmbs').AsString<>DataSetFYSJSYQKSJJ.FieldByName('xmbs').AsString) or (DataSetXMFYSQSJJ.FieldByName('xh').AsString<>DataSetFYSJSYQKSJJ.FieldByName('xh').AsString) then
   begin
       DataSetXMFYSQSJJ.Next;
   end;

end;
end;
图示:怎么样让每条记录都能计算出自己的从数据集的数据呢?
回复

使用道具 举报

发表于 2008-7-7 13:39:25 | 显示全部楼层
楼主,你现在的做法有什么问题呢?
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-7-7 15:34:20 | 显示全部楼层
我在表格文档中嵌入了一个button,想通过该button实行一些操作,可是该button老是不能显示阿,即使显示也是在那里不停的闪烁,点击后就不显示了
回复 支持 反对

使用道具 举报

发表于 2008-7-7 15:39:47 | 显示全部楼层
应该是button没有与单元格绑定导致的。
你在数据集区域内,选择一个单元格。然后双击button,系统会将单元格与button绑定起来。
之后,你就可以正常使用了
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-7-7 15:47:50 | 显示全部楼层
我就是按照你那样操作的,我选择的是嵌入!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-7-7 15:49:57 | 显示全部楼层
如图所示:两个button在那里闪烁,点击之后就不见了!

222.jpg

28.51 KB, 下载次数: 90

回复 支持 反对

使用道具 举报

发表于 2008-7-7 16:01:33 | 显示全部楼层
button1 的click事件上写代码了吗?
如果有,屏蔽了是否正常了呢?
如果正常,把代码帖出来看看
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-7-8 09:11:57 | 显示全部楼层
我没有写任何button事件!你们不行远程协助看看吧!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-7-8 09:23:50 | 显示全部楼层
这样吧!有没有单击表格文档中的某一行而触发一个事件的
回复 支持 反对

使用道具 举报

发表于 2008-7-8 09:34:18 | 显示全部楼层
试试字段的OnClick事件。
另外,你不要把button放到自动增长的数据区域,放在只显示一次的位置试试
回复 支持 反对

使用道具 举报

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

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-7-18 22:52 , Processed in 0.049055 second(s), 18 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

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