BeginChange (role)
De Wiki1000
procedure BeginChange;
Cette procédure indique le début d'un ensemble de changement dans le rôle.
Pas de paramètre. |
Note : A l'intérieur d'un bloc BeginChange / EndChange les rôles listes ignorent les notification d'ajout d'objet. |
Exemple
procedure WFClassA.doSomething; var inst:WFClasseC; idx:Integer; t1,t2,t3:longint; begin WFClasseCList.BeginChange; try with Transaction do begin instC := WFClasseC.Create; // RefA is the reciprocal role of WFClasseCList // without BeginChange the instC would have been inserted in WFClasseCList instC.oidRefA := InstanceOID; end; finally WFClasseCList.EndChange; end; end;
Voir aussi