Компилятор позволяет явно не реализовывать одноименные свойства оставшихся интерфейсов, если одно из свойств реализовано

[EmilyGraceSeville7cf]

type
  I1 = interface
    property X: byte read;
  end;
  
  I2 = interface
    property X: byte read;
  end;
  
  T = class(I1, I2)
  public
    property I1.X: byte read 0; // I2.X не реализовано, но код компилируется успешно.
    property I1.X: byte read 0;
  end;
  
begin
  var x := new T();
  Writeln(I1(x).X);
  Writeln(I2(x).X);
end.

[miks1965]

Да, это ляп, - спасибо

[miks1965]

Ляп