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