Mise à jour des différents objets de la base de données

12/9/2018

1357

Mise à jour des différents objets de la base de données

BoldSystemHandle a un UpdateDatabase méthode pour tous les objets, mais comment voulez-vous mettre à jour des objets individuels?
procédure UpdateDatabaseWithObjects(Objets: tableau de TBoldObject Système: TBoldSystem)
var
& nbsp & nbsp I: Integer
& nbsp & nbsp ObjectList: TBoldObjectList
begin
& nbsp & nbsp si non Affecté(Système), puis
& ! & ! & ! & nbsp Système := TBoldSystem.DefaultSystem
& nbsp & nbsp ObjectList := TBoldObjectList.Créer
& nbsp & nbsp essayer
& ! & ! & ! & nbsp for I := Faible(Objets) à Élevé(Objets) ne
& ! & ! & ! & ! & ! & nbsp ObjectList.Ajouter(Objets[I])
& ! & ! & ! & nbsp si ObjectList.Count > 0 then
& ! & ! & ! & ! & ! & nbsp Système.UpdateDataBaseWithList(liste d'objets)
& nbsp & nbsp enfin
& ! & ! & ! & nbsp ObjectList.Gratuit
& nbsp & nbsp fin
fin
Informations fournies par Eric Holton http://www.holtonsytems.com

Mise a jour des differents objets de la base de donnees

Mise a jour des differents objets de la base de donnees : Plusieurs milliers de conseils pour vous faciliter la vie.

BoldSystemHandle a un UpdateDatabase methode pour tous les objets, mais comment voulez-vous mettre a jour des objets individuels?
procedure UpdateDatabaseWithObjects(Objets: tableau de TBoldObject Systeme: TBoldSystem)
var
& nbsp & nbsp I: Integer
& nbsp & nbsp ObjectList: TBoldObjectList
begin
& nbsp & nbsp si non Affecte(Systeme), puis
& ! & ! & ! & nbsp Systeme := TBoldSystem.DefaultSystem
& nbsp & nbsp ObjectList := TBoldObjectList.Creer
& nbsp & nbsp essayer
& ! & ! & ! & nbsp for I := Faible(Objets) a Eleve(Objets) ne
& ! & ! & ! & ! & ! & nbsp ObjectList.Ajouter(Objets[I])
& ! & ! & ! & nbsp si ObjectList.Count > 0 then
& ! & ! & ! & ! & ! & nbsp Systeme.UpdateDataBaseWithList(liste d'objets)
& nbsp & nbsp enfin
& ! & ! & ! & nbsp ObjectList.Gratuit
& nbsp & nbsp fin
fin
Informations fournies par Eric Holton http://www.holtonsytems.com