Standardwert für Eigenschaft definieren

[Muetze1]

Zitat:

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);