Ich denke die Rekordkonstante.
Bei einer Klasse kann man es übrigens auch so machen:
Delphi-Quellcode:
type
TFahrzeug = (auPKW, auLKW);
TFahrzeugdaten = class
private
FArt: TFahrzeug;
procedure SetArt(const Value: TFahrzeug);
published
property Art : TFahrzeug read FArt write SetArt default auPKW;
end;
Mfg