Hallo,

ich hab folgendes Konstrukt (andere Klassen/Methodennamen, aber selbe Situation)

markieren

Delphi-Quellcode:

type
  TBasisKlasse = class(TObject)
  private
  public
    procedure DoSomething(A: Integer); virtual;
end;

Nun wollte ich in der Kindklasse folgendes machen

markieren

Delphi-Quellcode:

type
  TKindKlasse = class(TBasisKlasse)
  private
  public
    procedure DoSomething(A: Integer); overload; override;
    procedure DoSomething(X: String); overload; // [Warnung] uAppDocumentClasses.pas(281): Methode 'DoSomehting' verbirgt virtuelle Methode vom Basistyp 'TBasisKlasse'
end;

Es geht mir dabei um die Warnung:

markieren

Code:

 [Warnung] uAppDocumentClasses.pas(281): Methode 'DoSomehting' verbirgt virtuelle Methode vom Basistyp 'TBasisKlasse'

Nun, eigentlich hat der Compiler ja völlig recht, aber wie kann ich dieses Problem nun trotzdem lösen, sodass ich und der Compiler zufrieden sind? Ist mein vorhaben überhaupt mit den "Gesetzen" von OOP / Delphi vereinbar?

mfG
mirage228

Probier mal folgendes (nicht getestet):

markieren

Code:

type
  TKindKlasse = class(TBasisKlasse)
  private
  public
    procedure DoSomething(A: Integer); overload; override;
    procedure DoSomething(X: String); overload; virtual; // Diese Signatur ist ja noch nicht als überschreibbar definiert
end;

Zitat von Bernhard Geyer:

Probier mal folgendes (nicht getestet):

markieren

Code:

type
  TKindKlasse = class(TBasisKlasse)
  private
  public
    procedure DoSomething(A: Integer); overload; override;
    procedure DoSomething(X: String); overload; virtual; // Diese Signatur ist ja noch nicht als überschreibbar definiert
end;

Hi,

Danke für deinen Vorschlag.
Aber leider funktioniert es so nicht, denn die Warnung ist immer noch da :-\

mfG
mirage228

markieren

Delphi-Quellcode:

type
  TBasisKlasse = class(TObject)
  public
    procedure DoSomething(A: Integer); overload; virtual;
end;

Wenn Du die Methode bereits in der Basisklasse als overload deklarierst bleibt die Warnung aus.

MfG,
Tryer

Zitat von Tryer:

markieren

Delphi-Quellcode:

type
  TBasisKlasse = class(TObject)
  public
    procedure DoSomething(A: Integer); overload; virtual;
end;

Wenn Du die Methode bereits in der Basisklasse als overload deklarierst bleibt die Warnung aus.

MfG,
Tryer

Hi,

vielen Dank, es klappt.

mfG
mirage228