AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

Durch record iterieren

Ein Thema von Strict · begonnen am 19. Mai 2020 · letzter Beitrag vom 20. Mai 2020
Antwort Antwort
Strict

Registriert seit: 25. Mär 2020
47 Beiträge
 
#1

Durch record iterieren

  Alt 19. Mai 2020, 19:11
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;
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.122 Beiträge
 
Delphi 12 Athens
 
#2

AW: Durch record iterieren

  Alt 19. Mai 2020, 19:59
System.RTTI.pas (früher RTTI.pas)

prinzipiell
Delphi-Quellcode:
uses
  System.RTTI;

var
  F: TRttiField;
begin
  for F in (TRttiContext.Create.GetType(TypeInfo(TRec)) {as TRttiRecordType}).GetFields do // für Variablen aka Felder im Record
    ...
aber ich weiß/glaube nicht, ob/dass es möglich ist Konstanten aufzulisten. (für globale Konstanten und Variablen sind ja ebenfalls keine TypeInfos vorhanden)
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PosEx im Delphi viel seltener praktiziert.

Geändert von himitsu (19. Mai 2020 um 20:04 Uhr)
  Mit Zitat antworten Zitat
Strict

Registriert seit: 25. Mär 2020
47 Beiträge
 
#3

AW: Durch record iterieren

  Alt 19. Mai 2020, 20:04
Leider funktioniert das mit Konstanten nicht.
Hier wäre der Umweg über das Enum vielleicht eine Idee, um keine wirkliche, doppelte Daten zu haben.
  Mit Zitat antworten Zitat
Raible

Registriert seit: 12. Mär 2012
30 Beiträge
 
#4

AW: Durch record iterieren

  Alt 20. Mai 2020, 16:01
evtl. so
allerdings ohne record

Code:
type
  TmyEnum = (A,B,C,D);

const
  myConst:array[TmyEnum] of string = ('A', 'B', 'C', 'D');


...
var u:TmyEnum;
 
for u=Low(TmyEnum) to High(TmyEnum) do
begin
  doAnythingWith(mxConst[u]);
end;
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 11:04 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz