Examine (avec le log. Super Macro)

linus06vl Messages postés 61 Statut Membre -  
 Pauluxtucru -
Bonjour,

Je voudrai écrire une macro pour faire des captures écran toutes les 15 mn.

Variable : nombre total de capture (nbcapttotal)
Message : vous devez choisir un multiple de 4
Question : combien de captures voulez-vous ?

examine : nbcapttotal =96
examine : nbcapttotal =92
examine : nbcapttotal =88
...........
...............
............
.........
examine : nbcapttotal =4

Outil Ecran Copier vers bmp;C:\Program Files\Captures\capture 1.bmp;
Pause 15 mn
Outil Ecran Copier vers bmp;C:\Program Files\Captures\capture 2.bmp;
Pause 15 mn
........................
....................
..................
.................
Outil Ecran Copier vers bmp;C:\Program Files\Captures\capture 96.bmp;


Comment puis-je indiquer à la macro que si la réponse à la question est par exemple 28, de faire que 28 captures et s'arrêter.

Merci d'avance.

Alain
Configuration: Windows XP
Internet Explorer 7.0

2 réponses

  1. shurtugl
     
    ta macro doit avoir une forme :

    _Début
    gadgets (ta question utilisateur "nombre désiré" => var A , etc)
    boucle
    impression écran
    enregistrement image
    compteur incrémental => var B
    Pause 15mn
    comparateur B<A
    fin boucle
    autres gadgets( traitement des images, renommer le dossier les contenants...)
    Fin_

    le compteur incrémental ajoute 1 à une variable a chaque fois que ton bidule prend une photo écran. le comparateur regarde si cette variable est inférieure ou non à la variable nombre désiré (cad vérifie qu'on a pas atteint le nombre max de photo a prendre) selon le résultat il sort de la boucle ou non. ainsi:

    |
    Question (nom du prog);combien de photo à prendre? (entrez un multiple de 4;<A>
    Label <Label1>
    |
    (ton truc a prendre les photos écran)
    |
    Calcul <B>;+;1
    Examine <B>;<;<A>
    Goto <Label1>
    Pause 00:00:00
    |
    (la suite du prog)
    |

    Il reste un problème dans cette manière de faire: tu preneur d'image écran doit à chaque fois donner un nom différent à la photo prise, pour ne pas écraser la précédente. Une autre solution où ce pb ne se pose pas, est de préparer autant de fois que nécessaire le système de photo écran, et en controlant à chaque fois après qu'on ai pas ateint le nombre max, sans quoi il faut sauter directement à la fin. du style :

    |
    Outil Ecran Copier vers bmp;C:\Program Files\Captures\capture 1.bmp;
    Pause 15 mn
    Outil Ecran Copier vers bmp;C:\Program Files\Captures\capture 2.bmp;
    Pause 15 mn
    Outil Ecran Copier vers bmp;C:\Program Files\Captures\capture 3.bmp;
    Pause 15 mn
    Outil Ecran Copier vers bmp;C:\Program Files\Captures\capture 4.bmp;
    Examine 4;<;<A>
    Pause 15 mn
    Goto <Labelfinal>
    Outil Ecran Copier vers bmp;C:\Program Files\Captures\capture 5.bmp;
    Pause 15 mn
    |
    etc
    |
    Pause 15 mn
    Outil Ecran Copier vers bmp;C:\Program Files\Captures\capture 96.bmp;
    Label <Labelfinal>
    |
    (suite du programme)

    là ca marcheras , je te l'assure. mais que c'est long à programmer. meme en copiant-collant le bazar 24 fois, il faut a chaque fois remplacer les valeurs dans les repertoire : capture n.bmp et dans les examine (selon un multiple de 4)
    0
  2. Pauluxtucru
     
    Bonjour, désolé de deterrer mais il y a bien plus simple et ca pourra aider les prochains qui se poseront la question:

    créer 5 variables
    indice = 1 en numérique
    nb_boucle = 10 en numérique (ou a poser en question utilisateur)
    var1 = C:\Program Files\Captures\capture en alpha
    extension=.bmp en alpha
    chemin= en alpha (nom vide)

    ensuite tu boucles:
    label début boucle
    examine indice < nb_boucle
    si oui, goto suite boucle
    si non goto fin boucle
    label suite_boucle
    calcul évolué: chemin=var1+indice+extension
    Outil Ecran Copier vers bmp;chemin
    calcul évolué: indice = indice+1
    Pause 15 mn
    goto debut boucle
    label fin boucle

    Cordialement
    0