Put (TSDataRemoteObject)
De Wiki1000
procedure Put;
Cette méthode effectue un PUT de la ressource SData.
Tip : Cette méthode utilise un fournisseur de service enregistré dans l'Administration |
Exemple :
procedure UpdateRemote(const iKey:string); var inst:RE_ClassA; begin // Retreive the resource to update inst := RE_ClassA.Get(iKey); // Update the resource if Assigned(inst) then begin inst.aInteger := 2; inst.Put; end; end; function CreateAndUpdateRemote:Boolean; var inst:RE_ClassA; begin // Create a resource inst := RE_ClassA.Create; inst.aString := 'string value'; inst.aInteger := 1; inst.Post; // The Post return has updated the value of the SDataKey attribute //Update the resource inst.aInteger := 2; inst.Put; // Verify inst := RE_ClassA.Get(inst.SDataKey); Result := Assigned(inst) and (inst.aInteger=2); end;
Voir aussi
— Classe entité de service distant (stereotype) — Développement DSM —