Bonjour,
J'ai bien suivi les indications trouvées ici pour piloter ma progress depuis Delphi.
J'ai d'abord :
Puis, dans un repeat (sur le contenu d'un dossier), j'ai :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 XMLInstruction := XMLGram.GetXMLInstruction('MyProgress'); if(XMLInstruction = nil) then showmessage('Instruction Progress non trouvée !'); Progress := TProgress(XMLInstruction.Get_ObjectReference);
Mon pb : à l'affichage, ma progress indique un max toujours égal à 100, ne tenant apparement pas compte de l'affection précédente ! Qq'un a t'il une idée ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 Progress.Current := 0; Progress.MaxField := IntToStr(var);
Merci de votre indulgence ...
NB
Partager