判断窗体存在
来源:互联网 发布:西西里的美丽传说知乎 编辑:程序博客网 时间:2024/05/18 06:28
var
form:Tform2;
procedure
TForm1
.
Button1Click(Sender: TObject);
begin
if
form=
nil
then
//也可写成if not Assigned(form) then
begin
form:=Tform2
.
Create(application);
end
;
else
begin
if
form
.
WindowState=wsMinimized
then
begin
ShowWindow(form
.
Handle,SW_SHOWNORMAL);
if
(
not
form
.
Visible )
then
//打开,但不可见
begin
form
.
Visible :=
True
;
form
.
BringToFront;
form
.
SetFocus ;
Exit;
end
;
end
;
end
;
form
.
Show;
end
;
阅读全文
0 0
- 判断窗体存在
- 怎样判断一个form1窗体存在?
- VC中判断窗体是否存在
- C#中判断子窗体是否存在
- 判断窗体是否存在,如果存在就激活
- 判断窗体是否存在,如果存在就激活
- 判断MDI窗体的子窗体是否存在
- 关于判断MDI窗体是否存在,存在则显示,不存在则创建
- 在有父窗体的前提下,判断子窗体是否存在,否则show出
- VBA判断ACCESS中的窗体是否存在(并且关闭和删除窗体)
- 如何判断存在弹出窗体?如何判断当前窗口是活动窗口?
- C# winfrom判断文件是否存在,不存在则创建,否则读取值显示到窗体
- 检测子窗体是否存在
- 窗体泄露(存在问题)
- [VB.NET]如何在一个窗体M中判断另一个窗体N中是否存在一个名称为A的事件?
- 判断文件是否存在
- 判断文件夹是否存在
- js判断文件存在
- C#码农Xamarin学习日记2
- crontab: command not found
- 『ORACLE』 创建监听(11g)
- 学习github
- C语言实现链表(二)
- 判断窗体存在
- npm start报错
- Android RecyclerView 使用完全解析 体验艺术般的控件
- 11种提高Java性能的写法
- mysql优化连接数防止访问量过高的方法
- 杭电ACM2031:进制转换
- Kotlin在安卓中的一些tips
- spark在eclipse中遇到的问题及处理措施_标记下
- 设计模式学习