Default Value bei eigenen Typ

[Der schöne Günther]

Na klar können sie das:

Delphi-Quellcode:

{$APPTYPE CONSOLE}

type
   TItem = (uno, dos, tres);
   TItems = set of TItem;

procedure processItems(const items: TItems = []);
begin
   //
end;

begin
   processItems();
end.