Discussion :

[dietrich]

existe t il un typeof ou getType en delphi 7

et un moyen de stocker le type recu?


je cherche egalement un conteneur generique
dans le genre object en dot net


merci

[TicTacToe]

Déjà, pour les types objets,

Tous les TObject on la méthode

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MonObjet.ClassType

de type TClass.

Ensuite pour les type simples

tu as les variants qui peuvent te venir en aide,
Aide/exemple de Delphi:

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
var
 
  V: Variant;
begin
  ...
  if TVarData(V).VType = varEmpty then ...;
 
  ...
  VarClear(V);
 
  TVarData(V).VType := varInteger;
  TVarData(V).VInteger := 1234567;
  ...
 
end;

[Yurck]

Bonjour,

En focntion de ce que tu veux en faire tu as l'opérateur IS qui permet d'effectuer certaines opérations autrefois faîtes avec TypeOf.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
 
procedure MyObject.MaProc(Sender : TObject);
begin
  If Assigned(Sender) and (Sender is TBitBtn) then ....
end;

a+

[dietrich]

merci