Overload + Reintroduce

[Neutral General]

Hi,

Ich schreibe gerade eine Klasse.
Ich möchte das diese Klasse diese beiden Constructoren hat:

Delphi-Quellcode:

constructor Create(Hwnd: THandle); 
constructor Create(WindowText: String);

Und zwar sollen die Create Methode überladen sein und die Original TObject.Create Methode soll verschwinden.

Delphi-Quellcode:

constructor Create(Hwnd: THandle); reintroduce;

So hab ich den Original Constructor weg aber halt ohne zu überladen.

Delphi-Quellcode:

constructor Create(Hwnd: THandle); reintroduce;
constructor Create(Hwnd: THandle); reintroduce;

geht nicht, weil ich überladen muss und bei

Delphi-Quellcode:

constructor Create(Hwnd: THandle); reintroduce; overload;
constructor Create(Hwnd: THandle); reintroduce; overload;

existiert immernoch die Original Create-Methode -.-
Wie macht man das denn jetzt ?

[Meflin]

Äh... das reintroduce einfach weglassen und overload verwenden :gruebel:

[Neutral General]

Ne dann bleibt die Original Create Methode auch bestehen...

[Muetze1]

ReIntroduce 1x
Overload 2x

Wenn du aber von TObject ableitest, wo die Constructoren noch nicht virtuell sind, dann einfach ohne alles.

[Meflin]

Zitat:

Zitat von Neutral General

Ne dann bleibt die Original Create Methode auch bestehen...

kann sein dass ich das mit override verwechselt habe... schonmal probiert?

[Neutral General]

Zitat:

Zitat von Muetze1

ReIntroduce 1x
Overload 2x

Wenn du aber von TObject ableitest, wo die Constructoren noch nicht virtuell sind, dann einfach ohne alles.

dann kommt das :[Fehler] hwndHandler.pas(15): Die überladene Prozedur 'Create' muss mit der Direktive 'overload' gekennzeichnet sein

Zitat:

Zitat von Meflin

Zitat:

Zitat von Neutral General

Ne dann bleibt die Original Create Methode auch bestehen...

kann sein dass ich das mit override verwechselt habe... schonmal probiert?

Ja: [Fehler] hwndHandler.pas(14): Eine statische Methode kann nicht überschrieben werden

[Meflin]

So ganz komme ich sowieso nicht mit: wieso willst du ZWEI konstruktoren in EINER klasse. wozu soll DAS gut sein :stupid:

[Aenogym]

Zitat:

Zitat von Meflin

So ganz komme ich sowieso nicht mit: wieso willst du ZWEI konstruktoren in EINER klasse. wozu soll DAS gut sein :stupid:

nunja, je nach verwendeted constructor das erstellte objekt eben anders initialisieren. das gibts sogar bei der VCL (wenn ich jetzt nur wüsste, wo...^^)

[Neutral General]

Delphi-Quellcode:

 TWindowHandler= class
 private

 public
  Handle: THandle;
  constructor Create(Hwnd: THandle); // reintroduce; overload; oder was auch immer...
  constructor Create(WindowText: String);// reintroduce; overload; oder was auch immer...
 end;

Naja bei manchen Klassen ist sowas einfach sinnvoll.
Da kann sich der Benutzer/Programmiere aussuchen was er für einen Parameter angibt.
Es gibt so Klassen. Mir fällt jetzt grad keine ein aber es gibt z.B eine Klasse die erwartet als Parameter entweder ein Handle oder irgendwas anderes was ich jetzt nicht weiß. Und ich brauche auch sowas.

Im Anhang noch eine Bild.

[Muetze1]

1. Ohne virtuelle Constructor:

Delphi-Quellcode:

Type
  TObject1 = Class
  Public
    Constructor Create;
    Destructor Destroy; Override;
  End;

  TObject2 = Class(TObject1)
  Public
    Constructor Create(AchWasWeissIch: Integer); Overload;
    Constructor Create(WasAucHImmer: String); Overload;
    Destructor Destroy; Override;
  End;

2. mit virtuellem Constructor

Delphi-Quellcode:

  TObject1 = Class
  Public
    Constructor Create(whatever: TForm); Virtual;
    Destructor Destroy; Override;
  End;

  TObject2 = Class(TObject1)
  Public
    Constructor Create(AchWasWeissIch: Integer); ReIntroduce; Overload;
    Constructor Create(WasAucHImmer: String); ReIntroduce; Overload;
    Destructor Destroy; Override;
  End;

Beides getestet in Delphi - what's the problem?