TDocument.ApprobationStatus
| TDocument = class (TObject) | Interface de TDocument | Exemples de TDocument |
Retourne les informations d'approbation du document Qubes
Syntaxe
function ApprobationStatus(): String
Remarques
Retourne les informations d'approbation du document Qubes.
La chaîne retournée est au format commatext: liste des approbations séparées par des vigules.
Avec nom=valeur, le nom correspond au login de l'approbateur et la valeur correspond à la date d'approbation.
Exemple: "eg=09/10/2001 20:06","pr=09/10/2001 20:06".
Exemples
var approbations:= TStrings.Create;
var doc:= TDocument.ConnectByID(12);
approbations.CommaText:= doc.ApprobationStatus;
for var i:=0 to approbations.Count-1 do begin
PrintLn('l''approbateur ' + approbations.Names[i] + ' a approuvé ce document le ' + approbations.ValueFromIndex(i));
end;
var doc:= TDocument.ConnectByID(12);
approbations.CommaText:= doc.ApprobationStatus;
for var i:=0 to approbations.Count-1 do begin
PrintLn('l''approbateur ' + approbations.Names[i] + ' a approuvé ce document le ' + approbations.ValueFromIndex(i));
end;