ShareInstanceRequestedLevel (Instance)

property ShareInstanceRequestedLevel:Integer;

Cet attribut positionne le niveau de définition des attributs privés de l'objet

La valeur de RequestedLevel doit être une valeur du niveau de partage

Littérale	Valeur	Signification
cstShareLevel_Default	-1	Indique un niveau par défaut
cstShareLevel_Group	0	Indique un niveau dossier
cstShareLevel_Shared	1	Indique un niveau activité
cstShareLevel_Society	2	Indique un niveau société
cstShareLevel_Undefined	3	Indique un niveau indéfini

Exemple:

function SetInstance_Private_Attribute(const S:string; iLevel:Integer; iValue:Integer):Boolean;,
var inst:ClassA;
begin
  Result := False;
  ClassManager.beginTran;
  try
   inst := ClassA.Find('Caption=%1','',true,[S]);
   if Assigned(inst) then
     begin
        inst.ShareInstanceRequestedLevel := iLevel;
        inst.unEntierA := iValue;
       Result := True;
     end;
   ClassManager.Commit;
  except
  ClassManager.RollBack;
  end;
end;

Voir aussi

— Objets_métiers_(tech) — Développement DSM —