Delphi中有多个MDI子窗体,如何判断一个MDI窗体已经打开,打开后如何使打开的MDI窗体获得焦点?

如题所述

举报该问题

第1个回答 2010-01-11

判断:
if Self.ActiveMDIChild = (MDI窗体类别) then
聚焦:
Self.MDIChildren[0].Focused := True;

相似回答

MDI技术实现及具体功能答：Delphi支持MDI程序非常容易，只需将主窗体的FormStyle特性设置为fsMDIForm或将子窗体的FormStyle特性设置为fsMDIChild即可。我们对工作所作的陈述表明，该程序需要读写多个文档，因此使用MDI是很直接的方法。在创建RichEditor.dpr工程后，就已经准备好建立该程序了。MDI程序的主窗体维护列表MDIChildren，包含了对...

delphi mdi子窗体显示和释放的问题答：调用的时候，假设MidForm是你的mid子窗体if not(CreateForm(MidForm))then Application.CreateForm(TMidForm,MidForm);mid的关闭要这样直接在close事件里写MidForm.Destroy;就行了，这样可以反复调用，关掉也是可以重新打开~

Delphi中MDI窗体调用MDI子窗体答：result:=true;//防止出现函数返回值没有定义的警告 for i:=0 to main.MDIChildCount do begin // 通过对窗体标题判断窗体是否存在 if main.MDIChildren[i].Caption=caption then begin //如果窗体已存在，则恢复窗体，并返回true SendMessage(mdichildren[i].Handle, WM_SYSCOMMAND, SC_RESTORE, 0)...

VB 如何判断MDI子窗体是否打开?答：对象不能用等号来判断。。。应该用is操作符。。。如：if activeform is nothing then msgbox "没有打开"

delphi mdi主窗体调用dll子窗体后怎么限制只能打开一次,如果已经打开...答：加个 formBoole = false; 为全局变量如果调用了dll 设置为true 判断如果为true 就调用了，不再调用，如果想两个窗口通迅，，用SendMessage 函数可以查下百度

delphi mdi 子窗体打开答：将form2-15全部设置成动态生成，开始进入form1，登录成功创建form2，form2.formstyle设置成fsMDIForm，form3～15的formstyle设置成fsMDIChild。

大家正在搜

将窗体对象中子窗体的导航按钮去掉 winform判断窗体是否打开 vba如何判断窗体是否加载如何在vs中设置子窗体在主窗体中添加子窗体数据库窗体中设置子窗体 access窗体打印判断判断VB窗体是否有内容 vb判断包含信息的窗体名