如何獲得MDI頂層窗體(100分)

  • 主题发起人 主题发起人 W1979
  • 开始时间 开始时间
W

W1979

Unregistered / Unconfirmed
GUEST, unregistred user!
我想獲得MDI主窗體中開啟的几個MDI子窗體中在最頂上的一個我這么做<br>show出來的東西總是空<br>請問是為什么? &nbsp;<br><br>var<br>&nbsp; &nbsp;TheWindow: HWND;<br>&nbsp; &nbsp;WindowText: array[0..255] of char;<br>begin<br>&nbsp; TheWindow:=GetTopWindow(form1.Handle);<br>&nbsp; GetWindowText(TheWindow,WindowText,255);<br>&nbsp; showmessage('Top Window: '+WindowText);<br>end;
 
with Form1.ActiveMDIChild do<br>&nbsp; showmessage('Top Window: '+Caption);
 
這樣確實是可以的﹐那么請問﹕我那段代碼為什么不行呢?
 
记得在那本书上看到Delphi的结构和Windows标准的MDI结构有点不同,具体等我翻翻书看看。
 
同意wk_knife
 
同意wk_knife<br>
 
&gt;&gt;记得在那本书上看到Delphi的结构和Windows标准的MDI结构有点不同<br><br>有什么不同呢?<br><br>
 
你搞错了,GetTopWindow是针对TPanel,TButton之类的控件的,如果你在Form中放几个Panel<br>之类的试试就知道了,MDIWindow是特殊的窗口,创建也是用特殊的API,CreateMDIWindow<br>
 
多人接受答案了。
 
后退
顶部