Properties eines Interfaces enumerieren

[paresy]

Hallo Leute...
ich hätte wieder mal eine Frage. Vielleicht hat ja jemand eine Idee?

Folgendes Interface:

Delphi-Quellcode:

 IFoo = interface()
  ['{2999EBBB-5D36-407E-A52B-E9142A45F19C}']
  procedure SetFooLocation(Location: String); stdcall;
  function GetFooLocation: String; stdcall;

  //Properties
  property FooLocation : String read GetFooLocationwrite write SetFooLocation;
 end;

Nun würde ich gerne alle Properties (hier: FooLocation) des Interfaces abfragen und dann falls Möglich Abfragen/Aufrufen.
Quasi für eine Art Serialisierung.

Normalerweise würde ich es über Published Properties machen. (Ganz normale RTTI Magic)
Die kommen leider nicht in Frage, da diese nicht stdcall sein können und ich das aber brauche um den TInterfaceInvoker korrekt nutzen zu können.

Hat jemand eine Idee?

Grüße,
paresy