Discussion :

[ouikkito]

Bonjour,
J'essaie de calculer le temps réel pour que la copie d'un document soit fini.

Que ce soit un document de 1Mo ou 10Go le temps ne sera évidemment pas le même mais hélas je ne trouve pas comment faire pour que 4D s'en rende compte :-(
Une fois lancé sa commande COPIER DOCUMENT il estime que c'est fait et n'attend pas le résultat
J'ai donc eu l'idée de faire une boucle "tant que" testant la taille du document original et la taille de la copie.
Mais la commande Taille document que j'utilise ne fonctionne pas (Apparemment la taille document de la copie donne la taille qu'il aura quand la copie sera terminée

Voici les lignes que j'ai écrit: le temps d'exécution d'une copie d'un fichier de 10Go prend .... 1 seconde :-)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
COPIER DOCUMENT(Chemin_Original;Chemin_Copie)
    $TailleOriginal:=Taille document(Chemin_Original)
    $TailleCopie:=0
    $heuredebut:=Heure courante
    Tant que ($TailleOriginal>$TailleCopie)
        $TailleCopie:=Taille document(Chemin_Copie)
    Fin tant que
ALERTE("temps d'exécution: "+Chaine(Heure courante-$heuredebut))

Connaissez-vous une autre commande pour avoir la taille réelle au moment de la demande (ou une autre idée pour répondre à mon besoin ? :-))

[stanc]

Bonjour,

C'est assez étonnant. J'ai du mal à croire que cette commande soit asynchrone.
Qu'est-ce qui te fait dire que la copie n'est pas terminée ?
Quelle est la valeur de OK après la commande ?
Quelles versions de 4D et de l'OS ?

[jmbiraghi]

Bonjour

COPIER DOCUMENT effectue la copie en mode synchrone. Donc il faut déclencher le chrono avant !

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
$Debut:=Nombre de millisecondes 
COPIER DOCUMENT(Chemin_Original;Chemin_Copie)
$Duree:=Nombre de millisecondes - $Debut
ALERTE("temps d'exécution: "+Chaine($Duree))

[stanc]

Donc il faut déclencher le chrono avant !

Ah oui, j'avais pas vu ça tiens. C'est sûr que si on déclenche le chrono quand le coureur arrive, ils seront tous ex-æquo