BeginChange (role)

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

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