Delphi-Quellcode:
type
TFahrzeug = (auPKW, auLKW);
TFahrzeugdaten = record
Art : TFahrzeug;
Marke : String;
AnzahlRaeder, Tueren : SmallInt;
end;
const
Fahrzeug: TFahrzeugdaten = (Art: auPKW; Marke: 'Töfftöff'; AnzahlRaeder: 5; Tueren: 0);
OH Stichwort "typisierte Konstanten" -> "Rekord-Konstanten"
Auch, wenn's Konstante heißt, ist eine typisierte Konstante wie eine Variable zu verwenden. Es handelt sich also genau genommen um eine initialisierte Variable.
Ein Experte ist ein Mann, der hinterher genau sagen kann, warum seine Prognose nicht gestimmt hat. (Winston Churchill)