ShareInstanceRequestedLevel (Instance)

property ShareInstanceRequestedLevel:Integer;

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

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 —