Gegeben ist ein Enum und ein Set davon:
Delphi-Quellcode:
TDataEnum = (tdHouse, tdCar);
TDataSet = set of TDataEnum;
Nun habe ich in einer Funktion eine Variable (im Kopf, als Parameter) vom Typ
TDataSet
Ich prüfe, ob das Set leer ist mit
if aDataSet = []
und danach füge ich Standardwerte hinzu.
Aktuell so
aDataSet := [tdHouse, tdCar];
Hier habe ich nun doppelten Code. Einmal bei der Zuweisung in der Funktion in einmal in der Deklaration ganz oben.
Kann man aDataSet nicht irgendwie die Hauptdeklaration (TDataEnum = ...) zuweisen, um das zu vermeiden?