Chinaunix首页 | 论坛 | 博客
  • 博客访问: 1696483
  • 博文数量: 263
  • 博客积分: 1218
  • 博客等级: 少尉
  • 技术积分: 2862
  • 用 户 组: 普通用户
  • 注册时间: 2011-06-19 02:33
文章分类

全部博文(263)

文章存档

2020年(12)

2019年(2)

2018年(10)

2016年(1)

2015年(20)

2014年(115)

2013年(46)

2012年(37)

2011年(20)

分类: WINDOWS

2012-08-10 17:19:24

ADOQuery1_BeforePost ( DataSet : TDataSet);

end;
是在ADOQuery1或者相关联的DataSource的数据集改动后,在将改动保存到内存之前激发的事件,上次使用这个事件是用来判断修改之后的数据是否规范,如果不规范,就给出提示
示例如下: 要修改的列关联的Column 是Score
ADOQuery1_BeforePost ( DataSet : TDataSet);】
var
  score:;

  score:=DataSet.FieldByName(‘score’).AsString; // 提取修改之后的数据
  if (‘score不符合规则’) then
    self.msgWarning(‘’输入的数据有错);
end;
ADOQuery1_AfterScroll (DataSet: TDataSet);

end;

是在点击与ADOQuery1相关联的DBGridEh1中的记录后激发的事件,可以用来做两个DBGridEh控件的关联事件。
如:点击DBGridEh1 中的记录1,在DBGridEh2中就显示记录1的详细信息(DBGridEh2与ADOQuery2相关联),(示例如下:
ADOQuery1_AfterScroll(DataSet: TDataSet);
var
  sql: ;

  sql := ’ select * from tableneme where key = ’ ” + ADOQuery1.fieldbyname
    (‘ key ’).AsString + ” ’ ’ ADOQuery2.sql.Close;
  ADOQuery2.sql.Clear;
  ADOQuery2.sql.Add(sql);
  ADOQuery2.sql.Open;
end;

作者:不详

转自:

阅读(6252) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~