Zitat von
tomsel:
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.
Das ganze ist standardmässig verboten ab (D6 oder) D7 - zu Recht. Du kannst ab da auch entsprechend initialisierte Variablen nehmen. Diese werden genauso initialisiert wie du geschrieben hast. Tausch einfach nur das const gegen var.
/EDIT: Zum nachvollziehen:
Delphi-Quellcode:
var
Fahrzeug: TFahrzeugdaten = (Art: auPKW; Marke: 'Töfftöff'; AnzahlRaeder: 5; Tueren: 0);