[Delphi 7]Transtypage et appels dynamique de methodes

Version imprimable

08/11/2006, 17h37
Jabbal'H

[Delphi 7]Transtypage et appels dynamique de methodes

Bonjour,
Je suis confronté à un problème assez complexe pour moi.
Je suis actuellement en BTS IG 2eme année, et dans le cadre d'un projet, j'essaye de faire de l'invocation dynamique de propriété, donc via les RTTI, jusque là ca va.
Mon problème bien du fait que je ne connais pas le type de ma propriété lorsque je la lance, donc je ne connais pas non plus le type de retour.

Et là je bloque, a priori d'après ce que j'ai pus comprendre, il faudrait utiliser des Variants personnalisés, mais je ne comprend pas tout.

Je viens donc vers vous, est ce que quelqu'un aurait des pistes, pour m'orienter ?

Merci d'avance.
08/11/2006, 18h43
anapurna
salut

regarde dans l'unité typinfo
il y a tous ce que tu as besoin
Code:

1 2 3 GetPropValue() PropType ...
@+ Phil
08/11/2006, 23h28
sjrd

Tu peux aussi utiliser VType sur le variant retourné par GetPropValue.

En fait voilà le code que j'avais déjà fait ( j'aurais du commencer par là )

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
function clIntrospectionOutils.returnProperty(obj :TPersistent;method : string):Variant;
            var
                myType : PPropInfo;
                i : integer;
                str : string;
                vVariant : Variant;
                 myVar : clExtendedVariant;
            begin
                myType :=GetPropInfo(obj.ClassInfo,method);
 
 
 
                case myType^.PropType^.Kind of
                  tkInteger : begin
                                  vVariant := GetOrdProp(obj,method);
                                  result := vVariant;
                              end
                  else
                              begin
                                  vVariant := GetStrProp(obj,method);
                                  result := vVariant;
                              end;
                end;
 
            end;

En fait je bloque sur le cast de variant vers le type de ma propriété, je regarde le VType dès que possible.
Merci