Records

[shmia]

Zitat von mumu:

var sowas: TData =( test1: 'Text'; test2: 12345);

ok, also das funktioniert zwar, aber nur für globale variablen, gibt es auch ne möglichkeit für lokale?

Delphi-Quellcode:

const
   DefaultData:TData = (test1: '(leer)'; test2: 666);
...
procedure .....;
var 
   sowas: TData;
begin
   sowas := DefaultData;  // kopieren der Defaultdaten
end;