Не видит содержимое текущего класса из лямбды в read индексного свойства

[SunSerega]

type
  t1 = class
    
    function f0<T>(f: ()->T) := f();
    
    function f1 := new Dictionary<byte, word>;
    
    //Ошибка: Неизвестное имя 'f1'
    property p[b: byte]: word read f0(()->f1.Get(b));
    
  end;
  
begin end.

Если вызывать f1 как self.f1 - всё работает.

[SunSerega]

С полем вместо метода тоже воспроизводится:

type
  t1 = class
    
    f1 := new Dictionary<byte, word>;
    
    function f0<T>(f: ()->T) := f();
    
    //Ошибка: Неизвестное имя 'f1'
    property p[b: byte]: word read f0(()->f1.Get(b));
    
  end;
  
begin end.