Online
Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.063 Beiträge
Delphi 12 Athens
|
AW: enum-Typ und array
11. Mai 2017, 20:02
Ach ja, dann gibt es auch noch IntToIdent und IdentToInt,
was z.B. für die Umwandulng von TColor <-> Integer verwendet wird, also in ColorToString und StringToColor,
oder als IdentToCursor.
Falls sich schon mal jemand gefragt hat, wie die Farbnamen und Cursornamen in den OI und die DFM kommen.
Delphi-Quellcode:
if IdentToInt(VonString, AlsInteger, DasMapping) then
AlsEnum := TDeinEnum(AlsInteger) // geht auch direkt, wenn der Enum 4 Byte groß ist, also genug Werte enthält (ab 16.777.215) oder siehe {$MINENUMSIZE 4}
else
AlsEnum := ...; // oder eine Exception
if not IntToIdent(Ord(VonEnum), AlsString, DasMapping) then
AlsString := ' nö'; // oder eine Exception
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.
Geändert von himitsu (11. Mai 2017 um 20:13 Uhr)
|