Delphi中实战中如何用FormActivate自动关闭界面
发表于:2024-09-25 作者:千家信息网编辑
千家信息网最后更新 2024年09月25日,本篇文章给大家分享的是有关Delphi中实战中如何用FormActivate自动关闭界面,小编觉得挺实用的,因此分享给大家学习,希望大家阅读完这篇文章后可以有所收获,话不多说,跟着小编一起来看看吧。下
千家信息网最后更新 2024年09月25日Delphi中实战中如何用FormActivate自动关闭界面
本篇文章给大家分享的是有关Delphi中实战中如何用FormActivate自动关闭界面,小编觉得挺实用的,因此分享给大家学习,希望大家阅读完这篇文章后可以有所收获,话不多说,跟着小编一起来看看吧。
下面我们主要讲解支付成功后如何自动关闭支付界面返回数据。
代码演示
我们还是用我们这个支付的项目
回到上章Trade.pas里面的FormActivate里面
如果按正常方式理解,我们应该都写在这个函数里面,当调用返回结果后,最后可以加上个两句代码
sleep(1500);
close;
来实现界面自动关闭。
当我们加上后运行这个程序,发现界面关没有关闭。也就是说,在FormActivate里面加上Close是不起作用的。
那我们应该用什么方式进行处理呢?其实也挺简单,我们加上一个Timer的控件,一个公共参数变量,即可实现。
界面中加上一个Timer的控件
然后在Private里面加入一个boolean的变量
然后在FormShow事件中先定义交易变量为未完成,Timer控制的间隔时间和启动。
bisTradeover := False;
Timer1.Interval := 1500;
Timer1.Enabled := True;
最后在在Timer控件的Timer1Timer写判断,当完成交易标志成功后就延时1.5秒然后关闭当前窗体。
这样我们每隔1.5秒就会自动检测是否完成交易,用来实现我们的窗体关闭。
以上就是Delphi中实战中如何用FormActivate自动关闭界面,小编相信有部分知识点可能是我们日常工作会见到或用到的。希望你能通过这篇文章学到更多知识。更多详情敬请关注行业资讯频道。
界面
变量
控件
交易
支付
实战
成功
代码
方式
更多
知识
窗体
篇文章
实用
也就是
也就是说
事件
作用
函数
参数
数据库的安全要保护哪些东西
数据库安全各自的含义是什么
生产安全数据库录入
数据库的安全性及管理
数据库安全策略包含哪些
海淀数据库安全审计系统
建立农村房屋安全信息数据库
易用的数据库客户端支持安全管理
连接数据库失败ssl安全错误
数据库的锁怎样保障安全
服务器1225v5和9700
网络安全听后感800
北京个人软件开发多少钱
数据库hashtable
新基建数据库前景如何
神圣二次元帝国 网络安全局
养老认证出现服务器返回错误
华为服务器2018年有哪些
计算机网络技术儒家文化
浪潮服务器做raid管理
网络技术及相关专业
诺数据库
软件开发年新
网络安全对网络影响
艾泽拉斯TBC数据库
运城网络技术哪家好
酒店cdn服务器
上海妈妈家互联网科技
vpn服务器加速软件
网络安全威胁主要包括有两类
网络安全管理法律措施
服务器raid卡厂家
中信集团直属软件开发中心
视频会议软件开发有哪些公司
北京搜畅网络技术
扶苗.网络安全教育
华为服务器控制台
pw服务器
数据库实训小结报告
httpd 服务器