Festes Array zur Laufzeit füllen

[Mavarik]

Nee nicht so kompliziert...

Delphi-Quellcode:

type
   TEnglishGematria = record
     Buchstabe: Char;
     Wert: Integer;
   end;

Const
   EnglishGematriaArray : Array[0..25] of TEnglishGematria = ((Buchstabe:'A';Wert:6),
                                                              (Buchstabe:'B';Wert:12),
                                                               ...
                                                              (Buchstabe:'Z';Wert:156));

[p80286]

Zitat von Mavarik:

Nee nicht so kompliziert...

das halte ich aber für einen Euphemismus.
Die Syntax für eine const Array of record ist ja nun nicht soo eingängig.
(aber immer noch besser als die ursprüngliche Version)


Gruß
K-H

[himitsu]

Schade beim Record ist, dass man die Feldbezeichner immer angeben muss.
Gut, man kann "leere" Felder einfach weg lassen, aber wenn man Alle angibt, wäre es nett, wenn es möglich wäre.
(hab's vergessen, aber eventuell ist auch die Reihenfolge der Recordfelder egal)

Code:

(Buchstabe:'A'),
(Wert:12),
(),
(Buchstabe:'Z'; Wert:156));