arri
Guest
http://www.cadforum.cz/cadforum_fr/qaid.asp?tip=5891les outils express doivent être installés (par exemple lors de l'utilisation de la commande surkill)
(acétate-ui-progress-init "travail:" 10000); init - longueur de l'intervalle
(setq i 0)
(répéter 10000; boucle
; fonctions utilisateur exécutées ici...
(setq i (1+ i))
i) mettre à jour la barre de progression
)
(acétate-ui-progress-done); rejeter la barre de progression
(acétate-ui-progress-init "travail:" 10000); init - longueur de l'intervalle
(setq i 0)
(répéter 10000; boucle
; fonctions utilisateur exécutées ici...
(setq i (1+ i))
i) mettre à jour la barre de progression
)
(acétate-ui-progress-done); rejeter la barre de progression
