Beliebige Klasse instanzieren

[Sir Rufo]

Zitat von DualCoreCpu:

Da ergibt sich aber die zweite Frage. Normalerweise sind die Getter und Setter in den Klassen private. Im Interface müssen die aber public sein, wie die Eigenschaften (properties) die von den Gettern und Settern gelesen und geschrieben werden. Gibt es da einen Workaround, der mir erspart, die Getter und Setter in den Fpc Klassen alle public zu setzen?

Ist das wirklich so in FPC?
In Delphi können die Methoden für das Interface stehen wo sie wollen.

Delphi-Quellcode:

type
  IFoo = interface
    procedure bar1;
    procedure bar2;
    procedure bar3;
  end;

  TFooImplementor = class( TInterfacedObject, IFoo )
  private
    procedure bar1; // es ist
  protected
    procedure bar2; // einfach
  public
    procedure bar3; // völlig egal
  end;