Kann eine Klasse verschiedene Typen handeln?

[hitzi]

Hallo,

kann eine Klasse verschiedene Typen verarbeiten? Ich zeig mein Vorhaben mal besser an einen Beispiel:

Delphi-Quellcode:

TValueInt = class(TObject)
private
  fValue : Integer;
public
  constructor Create(Value : Integer);
end;

TValueString = class(TObject)
private
  fValue : string;
public
  constructor Create(Value : string);
end;

TValue = Class(TValueInt aber auch TValueString geht das?)
private
public
  constructor Create(Value : Integer);
  constructor Create(Value : string); override;
end;

Am Ende möchte ich einfach nur zum Beispiel value := TValue.Create('Test') sagen können und die entsprechende "Unterklasse" wird automatisch ausgewählt.

Geht so was?


Viele Grüße

[Corpsman]

Ja und Nein

du könntest ne Abstracte Basisklasse machen und dann von beiden Ableiten

damit dann deine andere Createn und dann immer mit Typecasts arbeiten

[Phoenix]

Nein. So geht das nicht.

Du müsstest Deine beiden Valueklasse von einer gemeinsamen Basisklasse ableiten (die am besten nicht TObject sind) und dann mittels dem Factory-Pattern die richtige Instanz erzeugen und aus der Factory zurückgeben.

Den Vorfahren einer Klasse kannst Du nicht dynamisch oder gar zur Laufzeit ändern. Das muss schon zur Compiletime feststehen und ab da isses fix.

[RavenIV]

Mehrfachvererbung gibt es in Delphi nicht direkt.
Das geht nur bei Interfaces.

Such mal hier im Forum nach "Mehrfachvererbung" oder so.
Es gibt schöne Beiträge, wo das super erklärt ist.

[hitzi]

Danke für die Tipps und Hinweise.