TDocument.SetFonctionsApplication
| TWebProcessDoc = class (TDocument) | Interface de TWebProcessDoc | Exemples de TWebProcessDoc |
héritée de TDocument.SetFonctionsApplication
| TDocument = class (TObject) | Interface de TDocument | Exemples de TDocument |
Remplacement de la liste des fonctions d'application du document.
Syntaxe
procedure SetFonctionsApplication(functionsCommaText: String)
functionsCommaText: Liste des noms abrégés des fonctions
Remarques
Doit être utilisé dans un BeginUpdate puis EndUpdate
Ne renvoie pas d'erreur, par exemple si une fonction est erronée.
Attention, la liste des fonctions est remplacée!!!
Exemples
Pour un remplacement des fonctions d'application
uses QuBESDocuments ;
var lst := TStrings.Create();
//ajoute la fonction de nom abrégé OPC à la liste
lst.Add('OPC');
//se connecte au document d'id 1000
var doc := TDocument.ConnectByID(1000);
doc.SetFonctionsApplication(lst.CommaText);
var lst := TStrings.Create();
//ajoute la fonction de nom abrégé OPC à la liste
lst.Add('OPC');
//se connecte au document d'id 1000
var doc := TDocument.ConnectByID(1000);
doc.SetFonctionsApplication(lst.CommaText);
Pour ajouter une fonction d'application aux fonctions existantes
uses QuBESDocuments ;
//se connecte au document d'id 1000
var doc := TDocument.ConnectByID(1000);
doc.BeginUpdate;
var lst := doc.CreateApplicationFunctionsList(True, False);
//ajoute la fonction de nom abrégé OPC à la liste
lst.Add('OPC');
doc.SetFonctionsApplication(lst.CommaText);
doc.EndUpdate
//se connecte au document d'id 1000
var doc := TDocument.ConnectByID(1000);
doc.BeginUpdate;
var lst := doc.CreateApplicationFunctionsList(True, False);
//ajoute la fonction de nom abrégé OPC à la liste
lst.Add('OPC');
doc.SetFonctionsApplication(lst.CommaText);
doc.EndUpdate