Variantes Record mit 2x Case

[Steffen]

Hallo Brüggendiek!

Zitat:

Wie ich an Deinem Record sehe, sind die Varianten so gestaltet, daß sie entweder etwas enthalten oder leer sind. Das ist keine echte Variante, denn die Variablen werden auf jeden Fall im Record angelegt.

Das ist nicht ganz richtig. Für mich ist zum Beispiel bei dieser Variante:

Delphi-Quellcode:

                     case SearchOverAllFields : Boolean of // Suche über alle Felder?
                       True  : (); // Keine Angabe von Suchfeldern, da Suche über alle Felder
                       False : (SearchFields : TSearchFields);

von Bedeutung, ob "SearchOverAllFields" gesetzt ist, oder nicht.

Die Logik ist die:
Wenn eine Suche über alle Felder gemacht wird, brauche ich nicht explizit anzugeben welche Felder ich nutzen möchte.
Wenn aber nicht über alle Felder gesucht werden soll, muss ich die einzelnen Felder speichern.
Somit ist das Flag "SearchOverAllFields" nicht nur als "Umschalter" gedacht...

Außerdem ist der Code, so wie ich ihn mit den Varianten gestaltet habe übersichtlicher und leicher zu verstehen.
Ich würde also schon gerne des Konstrukt nahezu unverändert lassen...