Durch record iterieren

[Strict]

Ich weiß die Frage ist bestimmt blöd aber ich kann sie nicht beantworten.
Ich habe ein ganz normales record

Delphi-Quellcode:

type TRec = record
 const
  A: string = 'A';
  B: string = 'B';
  CD: TArray<stirng> = ['C', 'D'];
end;

Gibt es eine Möglichkeit durch dieses Record zu gehen ohne extra noch einmal die Werte zu kennen?

Meine erste Idee: alles in ein Enum auslagern. Durch TRecData kann man dann iterieren... vielleicht? Und das Enum in einen String umwandeln.

Delphi-Quellcode:

type
 TRecData = (A, B, CD);

type TRec = record
 const
  A: string = TRecData.A;
  B: string = TRecData.B;
  CD: TArray<string> = [TRecData.C, TRecData.D];
end;