Hey,

kenn mich mit der überschreiben von Klassenmethoden noch nicht so aus. Ich würde gerne die Prozedur "ShowModal" eines Formulars etwas abändern, und zwar so, dass man ein Argument übergeben kann. Natürlich soll sie immer noch das machen, was ShowModal eben macht. Geht das?

Dafür kannst du eine Methode nicht überschreiben, das geht nur bei gleichen Parametern. Du kannst aber einfach selbst eine Methode mit diesem Namen und mit Parameter anlegen und darin das geerbte ShowModal aufrufen.

markieren

Delphi-Quellcode:

...
  Result := inherited ShowModal;

markieren

Delphi-Quellcode:

function TMyForm.MyShowModal(Const Arg : TArg) : Integer;
begin
 MyProperty := Arg;
 Result := ShowModal;
end;

Normalerweise kann man überschreiben. Dazu wäre eine zusätzliche Property einzuführen, die den Parameter aufnimmt.

Kennt denn keiner reintroduce?

zusammenfalten · markieren

Delphi-Quellcode:

TMyForm = class(TForm)
private
  // ..
public
  function ShowModal(AMeinParam1: String; AMeinParam2: Integer): Integer; reintroduce;
end;

implementation

function TMyForm.ShowModal(AMeinParam1: String; AMeinParam2: Integer): Integer;
begin
  // Sachen tun
  Result := inherited ShowModal();
end;

Zitat von Neutral General:

Kennt denn keiner reintroduce?

zusammenfalten · markieren

Delphi-Quellcode:

TMyForm = class(TForm)
private
  // ..
public
  function ShowModal(AMeinParam1: String; AMeinParam2: Integer): Integer; reintroduce;
end;

implementation

function TMyForm.ShowModal(AMeinParam1: String; AMeinParam2: Integer): Integer;
begin
  // Sachen tun
  Result := inherited ShowModal();
end;

Klar kann man das machen.
Aber warum sollte man eigentlich?
Es ist doch in Wirklichkeit eine neue Funktion. Also warum gibt man dem Kind keinen neuen Namen?

Weil das die Antwort auf seine Frage war (Das ist hier im Forum oft ein kleines Problem - Es wird oft nicht die Frage beantwortet sondern 3x um den heißen Brei herumgeredet und diskutiert welche Alternative die Beste ist Und gerade wenn der Fragende ein Anfänger ist versteht er oft kein Wort und kann mit den Antworten nichts anfangen :X )
Und je nach Parametern bzw. allgemein der Semantik der überschriebenen/neuen Funktion sehe ich kein Problem darin das Original ShowModal zu überschreiben statt eine weitere ShowModal-Funktion hinzuzufügen.

Zitat von Cubysoft:

Ich würde gerne die Prozedur "ShowModal" eines Formulars etwas abändern, und zwar so, dass man ein Argument übergeben kann. Natürlich soll sie immer noch das machen, was ShowModal eben macht. Geht das?

Wenn es darum geht, beim Anzeigen eines Form mit ShowModal gleich auch diverse Parameter zu setzen: Ich verwende z.B. einen Splash-Screen in einem meiner Projekte gleichzeitig auch als Info-Bildschirm, dann jedoch leicht abgeändert, oder z.B. das Benutzer-Anmelde-Form, das beim Programmstart etwas anders aussieht als beim späteren Aufruf zum Anlegen eines neues Benutzers. Da setze ich dann jeweils ein Property in der modal aufzurufenden Form, bevor ich es mit ShowModal anzeigen lasse. In OnShow der modalen Form wird dann je nach Zustand des Properties so oder anders verfahren.