Du kannst das Event sehr wohl überschreiben, aber nicht in dem herkömmlichen Sinne.
In der Klasse1 muss ja eine Methode implementiert sein, die überprüft, ob eine Event-Methode ausgeschrieben wurde.
Diese sieht im Allgemeinen ungefähr so aus:
Delphi-Quellcode:
procedure TKlasse1.DoMessage;
begin
if Assigned(FOnMessage) then
FOnMessage(Self);
end;
Somit kannst du die DoMessage-Methode überschreiben, und dort dein ShowMessage einbauen.
MfG
Stevie