搞不明白，有关MDI

我在父窗体中怎样取得和操作当前子窗体上的组件的属性？  
  如  
  MainForm   中：  
        if   SaveDialog1.Execute   then  
                      子窗体.memo1.Lines.SaveToFile(caption);  
   
  我无法使用   子窗体.memo1.Lines.SaveToFile(caption);，为什么？  
  问题点数：20、回复次数：6Top

1 楼cg1120（代码最优化－§惟坚韧者始能遂其志§）回复于 2002-05-15 16:44:47 得分 1

是不是没有uses那个单元Top

2 楼yuanjunjing（danny）回复于 2002-05-15 16:46:19 得分 1

在mainform中uses   子窗体unitTop

3 楼yyy_er（云儿）回复于 2002-05-15 16:53:53 得分 0

谢谢大家，我有uses  
  如下：  
  implementation  
   
  {$R   *.dfm}  
   
  uses   CHILDWIN,   about;  
   
  但是我写   CHILDWIN.只有   TMDIChild的提示，而没有   MDIChildTop

4 楼hongjiang（江边鱼）回复于 2002-05-15 17:02:31 得分 8

或许CHILDWIN实例已经被你关闭了吧？Top

5 楼ihihonline（潇潇->戒烟）回复于 2002-05-21 08:54:14 得分 2

不懂，不懂，  
  如果没有uses子窗体，如何打开这个子窗体啊？呵呵  
   
  你这个子窗体应该是动态创建的吧，你确认这个子窗体打开了？Top

6 楼lxjwww（东乞儿）回复于 2002-05-21 09:26:45 得分 8

MainForm   中：  
    function   GetMemo:TMemo;  
    property     Memo   :   TMemo   read   from   GetMemo;  
   
   
  function   TMainForm.GetMemo:Tmemo;  
        if   ActiveMDIChild   =   nil   then   Result   :=   nil  
            else   Result   :=   TChildForm(ActiveMDIChild).Memo;  
  end;  
   
  procedure   TMainForm.------;  
          if   Memo   <>   nil   then   begin    
                if   SaveDialog1.Execute   then   begin  
                      Memo.Lines.SaveToFile(----);  
                      ...  
                end;  
            end;  
  end;  
   
  Top

相关问题

• childwin
• 子窗体
• getmemo
• memo
• tmemo
• savetofile
• mainform
• nil
• lines
• then

• 帖主：yyy_er
• cg1120
• yuanjunjing
• hongjiang
• ihihonline
• lxjwww

• Delphi类图书
• Delphi类源码下载
• Delphi控件下载