DELPHI中 screen.Cursor:=crhourglass; adoQuery.close; adoquery.Open; screen.Cursor:=crdefault;啥意思
2021-02-05 11:16
阅读：535
标签：ext 程序 amp pyw ofo blank vps 解释 close DELPHI中 screen.Cursor:=crhourglass; adoQuery.close; adoquery.Open; screen.Cursor:=crdefault;啥意思 标签：ext 程序 amp pyw ofo blank vps 解释 close 原文地址：https://www.cnblogs.com/jijm123/p/11444565.html鼠标忙
这段代码大概是用来演示鼠标的用法的。具体解释如下：
使鼠标指针为沙漏状。（以表示程序正忙）
screen.Cursor:=crhourglass;
把（打开的）数据库关闭。
adoQuery.close;（个人以为改成这样更好：if adoQuery.Active then adoAuery.close;）
打开数据库。
adoquery.Open;
把鼠标指针恢复成缺省状态。
screen.Cursor:=crdefault;
如果在你程序中使用，建议用以下代码：
screen.Cursor:=crhourglass;
if adoQuery.Active then
adoAuery.close;
try
adoquery.Open;
finally
screen.Cursor:=crdefault;
end;
上一篇：delphi 运算符重载
文章来自：搜素材网的编程语言模块，转载请注明文章出处。
文章标题：DELPHI中 screen.Cursor:=crhourglass; adoQuery.close; adoquery.Open; screen.Cursor:=crdefault;啥意思
文章链接：http://soscw.com/index.php/essay/51305.html
文章标题：DELPHI中 screen.Cursor:=crhourglass; adoQuery.close; adoquery.Open; screen.Cursor:=crdefault;啥意思
文章链接：http://soscw.com/index.php/essay/51305.html
评论
亲，登录后才可以留言！