Bonjour,
Comme indiqué dans le titre, j'essaye de lister mes propriétés et méthode d'un objet COM avec RTTI (s'il y'a une autre méthode, je suis preneur!):
Le pb, c'est que RTTI ne me renvoie que les prop. published.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17 uses typinfo; var MyObjCom: TObjCom; ..... procedure TForm1.FormCreate(Sender: TObject); var Count, Loop: Integer; List: TPropList; begin Count := GetPropList(TypeInfo(TObjCom), tkAny, @List); Listbox1.Items.BeginUpdate; for Loop := 0 to Pred(Count) do Listbox1.Items.Add(List[Loop]^.Name); Listbox1.Items.EndUpdate; end;
Question: Comment renvoyer toutes les prop. ou à défaut, dans mon activex, comment mettre mes prop. et méthodes à published?
Partager