TDataViewSourceContainers - Exemples

TDataViewSourceContainers = class (TQubesDataViewSource)Interface de TDataViewSourceContainersExemples de TDataViewSourceContainers

Exemple d'utilisation dans un suivi en continu

uses SysUtils, QubesDataViews, QubesDataViewsSources.Containers;

//Creation de l'objet de source
var dataSource := TDataViewSourceContainers.Create(['MyParam String=MYPARAM']);

//Creation de la vue maintenue
var dataView := DeclareView('Containers', dataSource, ['ID', 'SITE', 'MyParam ', 'CONTAINER_ID', 'UM_ID', 'TYPE', 'GPAO_ID']);

//Récupération de l'ancienne valeur du checkpoint pour la mise à jour de la vue
var CP := ObjectStore.Value['Containers.CheckPoint'];

//Initialisation ou mise à jour de la vue
CP := dataSource.Update(dataView,CP);

//Sauvegarde de la valeur du checkpoint pour la future mise à jour de la vue
ObjectStore.Value['Containers.CheckPoint'] := CP;