Variable in einem Record mit defaultwert

[jbg]

Für alle Variablen vom Typ test geht das nicht. Du kannst aber eine Konstante deklarieren und diese dann immer zuweisen.

Delphi-Quellcode:

const testDefault: test = (
  var1: '';
  var2: 0;
  var3: True
);
...

var t: test;
begin
  t := testDefault;
  ShowMessage(IntToStr(Ord(t.var3)));
end;