如何继承父窗体中的过程或函数?

Question

如:
  父窗体中有有个 myProc 过程,如何在子窗体中去继承?
  请给个简单的例子.
谢谢

Answer 1

同意楼上的观点，父窗体和子窗体的关系是容器和摆放控件的关系
你可以通过事件机制来处理
具体可以在VCL中参考OnClick的实现代码

Answer 2

在父窗体 fmMB 中有:Procedure MyTest();
Begin
   showmessage('hi');
End;
现子窗体 fmSon 如何继承它?
不允许用 fmMB.MyTest

Answer 3

在父窗体 fmMB 中有:Procedure MyTest();
Begin
   showmessage('hi');
End;----------------------------------必须说明的是: 这个MyTest()不属于某一个“窗体”. 它只是某一个“单元”中的一个过程。

Answer 4

这个不在类中，没有继承的。你可以这样用，在implementation之前声明一下，如：
procedure A;implementationuses Unit2;{$R *.dfm}procedure A;
begin
  ShowMessage('A');
end;
然后，就可以在其子窗体中调用A了

Answer 5

在父窗体 fmMB 中有:Procedure MyTest();
Begin
   showmessage('hi');
End;----------------------------------必须说明的是: 这个MyTest()不属于某一个“窗体”. 它只是某一个“单元”中的一个过程。
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
顶，这样就不是继承，而是调用“单元”过程了