关于delphi exit 继承

父类窗体frm 继承下来一个子类 form2

父类按钮代码

procedure Tfrm.Button1Click(Sender: TObject);
begin
  ShowMessage('');
  Exit;
  ShowMessage('');
end;

子类按钮

procedure Tfrm2.Button1Click(Sender: TObject);
begin
  showmessage('你好吗') ;
  inherited;
  ShowMessage('你好');
end;

除了2 别的都show出来了

所以父类中的 exit 只在父类中起做用