Readonly interface erzeugen (MMX?)

[himitsu]

Gibt es bei Interfaces auch die Möglichkeit Property zu erweitern, so wie bei Objeken?

Die Property sind ja eine Delphi-Sache ... das Windows-Interface hat ja offiziell nicht sowas.

Delphi-Quellcode:

type
  IReadOnlyData = interface
    ['{7F08C18E-0E6A-40F1-9DD9-AFDDA473FB8B}']
    function GetActualValue(const p_Component: Byte): double;
    function GetCurrentActual(): IActualValue;
    function GetDefaultBehaviourMode(): String;

    property DefaultBehaviourMode: String read GetDefaultBehaviourMode;
    property CurrentActual: IActualValue read GetCurrentActual;
    property ActualValue[const p_Component: Byte]: double read GetActualValue;
  end;

  IData = interface( IReadOnlyData )
    ['{E9154DD9-A28E-4703-9DD8-5181A27869E2}']
    procedure SetActualValue(const p_Component: Byte; const p_Value : double);
    procedure SetCurrentActual(const p_Value: IActualValue);
    procedure SetDefaultBehaviourMode(const p_Value: String);

    property DefaultBehaviourMode write SetDefaultBehaviourMode;
    property CurrentActual write SetCurrentActual;
    property ActualValue write SetActualValue;
  end;

[Rollo62]

Zitat von himitsu:

Gibt es bei Interfaces auch die Möglichkeit Property zu erweitern, so wie bei Objeken?

Würd ich nicht drauf wetten, besser mal austesten (oder in die Doku schauen, vermutlich ohne Erfolg ... )