哪位大虾给我讲一下inherited的用法

procedure TMainForm.actTermRloginExecute(Sender: TObject);
var
  bRlogin: Boolean;
  i: integer;
begin
  inherited;
  bRlogin := False;
  if self.MDIChildCount > 0 then begin
    if MessageBox(GetActiveWindow,'重新登录将关闭所有仿真终端，是否继续?'
        ,'提示',MB_OKCANCEL+MB_ICONQUESTION) = mrOK then begin
      bRlogin := True;
      for i := 0 to self.MDIChildCount-1 do
        self.MDIChildren[i].Close;
    end;
  end else begin
    bRlogin := True;
  end;
  if bRlogin then begin
    self.Hide;
    self.Show;
  end;
end;
这是 一个自己定义的过程。
这段代码的具体功能您不用细看，我只想问一下，inherited;到底啥用？我看过delphi 6.0的帮助,难道是为了使用self吗？