type
  t1 = class
    b: byte;
    function f1 := 0;
  end;

begin
  
end.