急! 如何关闭运行SQL时的砂漏CURSOR,或如何使控件根据数据库中的数值实时变化。

fly_lee 2001-03-21 05:20:00
我的程序需要监视远程数据库中某个不断变化的数值,我试验了用TTABLE,TQUERY等控件
都不能刷新,只好用TIMER每1秒取一次,但每次取的时候,程序CURSOR会变成砂漏,
这样不断跳,实在讨厌,请教怎么关闭它,
如果哪位能赐教用什么控件能自动监视远程数据库中变化数值,更是感激万分!

急死我了...

...全文
51 1 打赏 收藏 转发到动态 举报
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
fly_lee 2001-03-22
  • 打赏
  • 举报
回复
关闭CURSOR的问题已经解决了,
现在继续请教第2个问题,我查了1下,大概用TQUERY或TDATESET可以作到,不过
我用的INTERBASE,用TIBQUERY不但作不到监视数据库,甚至不能EDIT,(STATE被设
成BROWSE了,而且不能改),怎么办?
第1章施工顺序 机具定位→打入套管→深入砂袋→拔出套管→机具移位→埋砂袋头; 第2章施工工艺 (1)设备采用履带臂架导管式打桩机,套管直径9cm,长15.5m,为便于拔管,上设桩头桩帽,准备好后,测量放样,设置井位桩。 (2)将导向架固定在孔位,在孔位处下挖0.1—0.15m深小坑,稳住管尖,放下套管,戴上桩帽,放好重锤。 (3)打桩桩锤不要过高,(一般以1.5m为宜),当入土2—3m后,可根据套管的下沉量逐渐提高桩锤,但不得超过3.0m,将钢套管打至设计标高后,即可上拨0.1—0.2m,消除管底真空吸力,以便管端张开。 (4)预先准备好长度比砂井长约30cm左右的用聚丙烯编织的土工布制成的袋,将底部扎紧,在袋底装一定数量重的砂,然后放入套管,将袋的上端固定在装砂漏斗口上,然后向袋填充砂直至砂装到齐袋口为止;或砂袋灌入砂后,用臂架吊起垂直放入管。 (5)用空压机向套管内加压,同上拔套管,袋装砂井施工完毕;装满砂子的袋,超出地面的长度不小于30cm,并伸入砂垫层不得卧倒。机具移位,填写施工记录。 第3章施工要点 (1)砂袋入井采用臂架吊起,应垂直下井,防止砂袋发生扭结,缩颈断裂和砂袋磨损. (2)拔管应垂直起吊,以防止带出或损坏砂袋,施工若发生上述现象,应在原孔边缘重打,当带出长度大于0.5m,应重新补打,对已施设的袋装砂井要及向袋内补砂,每隔三天补一次,一般补2—3次. (3)当砂袋灌入砂后,露天堆放应遮盖,切忌长间暴晒,以免砂袋老化. (4)在打设砂井地基就开始沉降,故地表面沉降测定板最迟应当在开始打砂井前设置好. (5)袋装砂井定位要准确,确保排水距离. (6)施工当经常检查套管端部的密闭情况,避免套管内进入泥土过多,影响加固深度. (7)严格控制砂井的设计入土深度,在钢套管上划出标尺,确保井底标高符合设计要求,并做好施工记录. (8)袋装砂井按铁路路基工程质量检验设定标准4.10.1—4.10.4条款标准进

2,497

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧