zoukankan      html  css  js  c++  java
  • Delphi数据库技术中Disablecontrols和Enablecontrols的功能

    一般来说,用来扫描整个数据库表并修改每个记录的某一个字段的程序如下所示:

    with Table Do

    begin

    DisableControls;{在修改记录的过程中,使其它部件无效}

    First; {将记录指针指向第一条记录}

    while not EOF do

    begin

    <读取记录的一个字段值到一个变量中>

    <做适当的修改>

    Edit; {将TTable部件置成编辑状态}

    <将修改后的字段值写回到其对应的字段>

    post; {将修改后的记录写回数据库}

    next; {修改下一条记录}

    end;

    enablecontrols; {恢复其它部件的功能}

    end;

        程序都是对TTable部件进行操作,因此使用With语句来防止错误的扩散是很有意义的。在这里要注意Disablecontrols方法和EnableControls方法的使用。DisableControls方法是在程序修改TTable部件中的记录时,切断TTable部件与数据访问部件TDatasource 部件的联系。否则,在对TTable中的每一修改之后,TDataSource 部件都会更新窗体中所有数据浏览部件的显示内容,这样会急剧减慢处理过程而且浪费时间。EnableControls方法是与DisableControle方法执行相反的操作,它是用来恢复TTable部件与TDatasource部件的联系并促使所有的数据浏览部件更新显示。

  • 相关阅读:
    如何检测死锁并快速定位死锁位置
    几种线程本地存储变量和普通变量的性能比较
    multi_index_container性能测试
    [高并发引擎]定时器模块
    [高并发引擎]Log模块
    静态博客教程 1:hexo + github
    蛇形填数
    实现简单的 ls 命令
    静态库与动态库的创建和使用
    用两个栈实现队列
  • 原文地址:https://www.cnblogs.com/Master-Qi/p/10185284.html
Copyright © 2011-2022 走看看