如何判断一个窗体已经打开,此问题为避免同时打开多个相同的窗口。 if form1.showing thenbeginshowmessage('for1 已经打开');end; 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 if FindWindow('TForm1','Form1') <>0 thenbegin ShowMessage('The Form1 is opened.'); exit;end; h:=findwindow(classname,name);if (h>0)and(iswindowenable(h))and(iswindowvisible(h)) then setforegroundwindow(h); ListBox透明问题 请问这个Action在procedure中是代表什么意思 Merry Christmas vista 下获取文件版本信息中的FileDateTime项 新手提问,关于时间类型写入数据库 关于以只读方式打开文件的一个问题。请各位帮忙。在线等,很急!谢谢! 谁有快捷按钮的bmp图片啊? 请问怎么解决不同分辨率下窗体的显示问题? 怎样判断一个dbe别名是否存在 我最近买了一套软件,有一个硬加密狗允许两台机器用,怎么样破掉啊?请高手提些宝贵意见! 关于windows xp的问题? 如何在delphi中对二维字符串数组赋值
begin
ShowMessage('The Form1 is opened.');
exit;
end;
if (h>0)and(iswindowenable(h))and(iswindowvisible(h)) then
setforegroundwindow(h);