AddContextVarValuesToTStrings
Affecte une Class/TStrings avec une variable contextuelle
Syntaxe
procedure AddContextVarValuesToTStrings(list: TStrings; varName: String; withNames: Boolean)
list : Nom de la TStrings a affecter
varName : Nom de la variable contextuelle
withNames : True si la liste est de type "nom-valeur"
Remarques
- La variable contextuelle doit être de type liste.
- Si withNames vaut True, la TStrings est créée au format (nom = valeur) : les noms correspondent aux "paramètres" de la variable contextuelle, les valeurs aux "valeurs" de la variable.
- Si withNames vaut False, la TStrings est créée au format "simple" : les chaînes correspondent aux "valeurs" de la variables contextuelle.
- La TStrings n'est pas écrasée : les éléments contextuels sont ajoutés aux chaînes potentiellement déjà présentes dans la TStrings (équivalent à TStrings.AddStrings).
- Voir aussi AddContextVarValuesToTDoubleList pour affecter une Class/TDoubleList (liste de flottants).
- Pour écrire une TStrings dans une variable contextuelle, utiliser SetTStringsToContextVarValues.
Exemples
var liste := TStrings.Create;
liste.CommaText := 'Qualité,Production,Maintenance';
AddContextVarValuesToTStrings(liste,'Donnees.ListeServices',False); // Ajoute à la TStrings les valeurs de la variable contextuelle "ListeServices" (type liste) de la tâche "Donnees"
liste.SortAndRemoveDuplicates; // Trie et supprime les doublons
SetTStringsToContextVarValues(liste,'Donnees.ListeServices',False); // Met à jour la variable contextuelle
liste.CommaText := 'Qualité,Production,Maintenance';
AddContextVarValuesToTStrings(liste,'Donnees.ListeServices',False); // Ajoute à la TStrings les valeurs de la variable contextuelle "ListeServices" (type liste) de la tâche "Donnees"
liste.SortAndRemoveDuplicates; // Trie et supprime les doublons
SetTStringsToContextVarValues(liste,'Donnees.ListeServices',False); // Met à jour la variable contextuelle