Hallo Delphifans,
wollte gerne eine (Druck)-Liste der Eigenschaften, eines Objekts haben.
Das würde ich dann mit 2 ähnlichen Objekten machen, die sich aber irgendwo unterscheiden.
Den Unterschied könnte ich dann z.B. in Word (Objekteigenschaften als Text importieren) anzeigen lassen.
Oder gibt es eine andere Möglichkeit mit normalen Mitteln oder ein Tool?
Danke vorab für die Hilfe.
ciao
LingNeu

Hallo,
hat den gar kein Anwender eine Idee, wie man eine Art Liste von den vorhandenen Properties machen kann.
Gruss
LingNeu

Zauberwort RTTI

Schöne Grüße, Florian

Hallo Florian,
danke für diesen Hinweis. Da sieht man mal wieder, obwohl ich mit D7 schon einige Zeit was mache, kannte ich diese Sache nicht.
Nun ist es aber so, das ich damit nicht auf die Schnelle meinen Wunsch erfüllen kann, eine einfache Liste von den Eigenschaften im Objekt-Inspektor zu bekommen. Vielleicht bin ich aber auch nur noch nicht soweit um über das Thema Rtti das zu schaffen.
Nach vielen Recherchen bin ich auf das Programm DFM-Editor gestossen und das entspricht schon eher meiner Vorstellung.
Leider habe ich dort aber auch nicht alle im Objekt-Inspektor angezeigen Properties, sondern nur die von mir veränderten Werte.
Nun muss ich halt immer noch den ganzen Strukturbaum im Objekt-Inspektor öffnen und über mehrere Screenshots dann diese Eigenschaften abnehmen und dann in ein Dokument einkopieren. Das mache ich dann mit einem anderen Objekt in einem anderen Projekt genauso und vergleiche die "Bilder" mit den Daten, ob und wo Unterschiede sind.

Schade das es keine andere Möglichkeit gibt - zumindestens scheint niemand eine Lösung zu finden, damit man wirklich mehrere Objekte miteinander vergleichen kann.
Warum ich das brauche - um Objekte über mehrere, unabhängige Projekte vergleichen zu können. Vor allem, um zu sehen, ob eine wichtige Einstellung (Eigenschaftswert) vergessen wurde.
Viele Objekte (Komponenten) haben teilweise über 100 Properties und da verliert man sehr leicht die Übersicht.

Evtl. finde ich doch noch eine Lösung - oder evtl. hat auch einer von euch noch eine Idee, die relativ schnell umsetzbar ist.
ciao
LingNeu

Sooo schwer ist selbst die alte RTTI nicht.

zusammenfalten · markieren

Delphi-Quellcode:

Uses TypInfo;

Var Obj: TObject; // halt irgendeine Objektinstanz
  List: PPropList;

Begin
  i2 := GetPropList(PTypeInfo(Obj.ClassInfo), List);
  If i2 > 0 Then
    Try
      SortPropList(List, i2); // muß nicht, kann aber
      For i := 0 to i2 - 1 do Begin
        // Name := GetPropName(List[i]);

      End;
    Finally
      FreeMem(List);
    End;
End;