zoukankan      html  css  js  c++  java
  • ADOQuery 的几个事件

    ADOQuery 的几个事件

    procedure ADOQuery1_BeforePost ( DataSet : TDataSet);

    begin

    end;

    是在ADOQuery1或者相关联的DataSource的数据集改动后,在将改动保存到内存之前激发的事件,上次使用这个事件是用来判断修改之后的数据是否规范,如果不规范,就给出提示

    示例如下: 要修改的列关联的Column Score

    procedure ADOQuery1_BeforePost ( DataSet : TDataSet);

    var

    score:string;

    begin

    score:=DataSet.FieldByName(‘score’).AsString; // 提取修改之后的数据

    if (‘score不符合规则’) then

    self.msgWarning(‘’输入的数据有错);

    end;

    procedure ADOQuery1_AfterScroll (DataSet: TDataSet);

    begin

    end;

    是在点击与ADOQuery1相关联的DBGridEh1中的记录后激发的事件,可以用来做两个DBGridEh控件的关联事件。

    如:点击DBGridEh1 中的记录1,在DBGridEh2中就显示记录1的详细信息(DBGridEh2ADOQuery2相关联)(示例如下:

    procedure ADOQuery1_AfterScroll (DataSet: TDataSet);

    var

    sql : string;

    begin

    sql:=’select * from tableneme where key=’”+ADOQuery1.fieldbyname(‘key’).AsString+”’’

    ADOQuery2.SQL.Close;

    ADOQuery2.SQL.Clear;

    ADOQuery2.SQL.Add(sql);

    ADOQuery2.SQL.Open;

    end;

    PS:现在用过这两个事件,以后还会补上其他相应事件。。

  • 相关阅读:
    小学生二元四则运算(F)
    补进度条
    附加作业
    个人总结
    第四 五周结对作业(照片)
    第四,五周——Java编写的电梯模拟系统(结对作业)
    第三周(JAVA编写的 wordcount)
    第三周续(读代码)
    第三周
    第二周续.(代码)
  • 原文地址:https://www.cnblogs.com/jiangyuxuan/p/1348864.html
Copyright © 2011-2022 走看看