关于MDIChild和MDIForm窗口的问题？（D3）

Question

直接建立，用SHOW打开就可以了。
你主要在MDIFORM中USES了MDICHILD就可以直接获取HEIGHT了。

Answer 1

(1)参考Delphi的MDI向导。
(2)参考Delphi的MDI向导，在它的Mdi子窗口上放上Image1。procedure TMainForm.Button1Click(Sender: TObject);
var
  i: Integer;
begin
    for I := MDIChildCount-1 downto 0 do
      if Self.MDIChildren[I].Active then
        ShowMessage(IntToStr(Self.MDIChildren[I] as TMDIChild).Image1.height));
end;

Answer 2

thanks to ether!能不能给我封装一个函数？比如AA函数，然后我ShowMessage(IntToStr(AA.Image1.height))就可以了还有怎样激活MDIChild窗口?

Answer 3

to ether:好像ShowMessage(IntToStr(Self.MDIChildren[I] as TMDIChild).Image1.height));
中少了个括号
还有这不能取得Image1.height的值