Refs (role)

De Wiki1000

(Différences entre les versions)

Version actuelle en date du 4 août 2009 à 09:20

property Refs[index:Integer]:TitObject;

Lecture seule

Cette propriété retourne l'objet du rôle d'index indiqué.

Result	L'objet du rôle.
Index	Index de l'objet

Exemple

Utilisation comme propriété indexée

var inst:WFClasseA; instC:WFClasseC; idx:Integer;
begin
  inst := WFClasseA.Find('unCode=%1','',True,['CODE-10/04/2009 09:22:48-0']);
  for idx:=0 to inst.WFClasseCList.Count-1 do
   begin
     instC := inst.WFClasseCList.Refs[idx];
   end;
end;

Utilisation comme itérateur

var inst:WFClasseA; instC:WFClasseC; 
begin
  inst := WFClasseA.Find('unCode=%1','',True,['CODE-10/04/2009 09:22:48-0']);
  foreach instC in inst.WFClasseCList do
   begin
     showMessage(instC.uneChaine);
   end;
end;

Voir aussi

OIDs

— Rôles (tech) — Développement DSM —

Refs (role)

Version actuelle en date du 4 août 2009 à 09:20

Affichages

Outils personnels

Navigation

Thèmes

Rechercher

Boîte à outils

@@ Ligne 15 : / Ligne 15 : @@
 Exemple
+'''Utilisation comme propriété indexée'''
 <source lang='delphi'>
-var idx:Integer;
+var inst:WFClasseA; instC:WFClasseC; idx:Integer;
 begin
-   for idx:=0 to MyRole.Count-1 do
+  inst := WFClasseA.Find('unCode=%1','',True,['CODE-10/04/2009 09:22:48-0']);
-    doSomethingWithInstance(MyRole.Refs[idx]);
+   for idx:=0 to inst.WFClasseCList.Count-1 do
+    begin
+     instC := inst.WFClasseCList.Refs[idx];
+   end;
+end;
+</source>
+'''Utilisation comme itérateur'''
+<source lang='delphi'>
+var inst:WFClasseA; instC:WFClasseC;
+begin
+  inst := WFClasseA.Find('unCode=%1','',True,['CODE-10/04/2009 09:22:48-0']);
+  foreach instC in inst.WFClasseCList do
+   begin
+     showMessage(instC.uneChaine);
+   end;
 end;
 </source>