Warum kompiliert Delphi diesen Codeabschnitt nicht???

[Rumpi]

Zitat:

folgende Codedeklaration(steht alles in einer Unit):

Delphi-Quellcode:

type 
  TSicherung = class(TObject)
  public
    procedure kontrolle; virtual;
  end;

  TsicherungCad = class(TSicherung)
  public
    procedure kontrolle; override;  
  end;

//****************************************************************

procedure TSicherung.kontrolle;
begin
  // Hauptcode
end;

//****************************************************************
procedure TSicherungCad.kontrolle;
begin
  // du kannst hier den Hauptcode rufen mit
  inherited Kontrolle;
   // !!!und oder!!! neuen Kontrolle-code schreiben  
end;

mfg Rumpi