PureBasic

dans le pg suivant je ne peux pas supprimer la boucle (dernières lignes)sinon il s'arrête avant d'afficher le message de la procedure CPU

Code : Tout sélectionner

Global Compte 

Procedure CPU() 
  Pourcent = CpuUsage() 
  If Pourcent < 5 
    Compte +1 
  EndIf 
  If Compte > 2 
    EndTimer(1) 
    MessageRequester("Information","Application Chargée") 
  EndIf 
EndProcedure 



 RunProgram("excel.exe","C:\_work\Fred\MAJ_Auto\Mafeuille.xls","") 
      StartTimer(1,150,@CPU()) 
      
Repeat 
  Event = WaitWindowEvent() 
Until Event = #PB_Event_CloseWindow ; End of the event loop 
End

le soucis si je laisse en l'état c'estque ça fonctionne mais le programme tourne tjs et je trouve pas ça très propre.
J'ai bien essayé des trucs genre ça et bien d'autres mais ça marche pas (snif) :

Code : Tout sélectionner

Global Compte 

Procedure CPU() 
  Pourcent = CpuUsage() 
  If Pourcent < 5 
    Compte +1 
  EndIf 
  If Compte > 2 
    EndTimer(1) 
    MessageRequester("Information","Application Chargée") 
a=1;je lui dis que dès que c'est ok (messagerequester apparait) a=1
  EndIf 
EndProcedure 


a=0
 RunProgram("excel.exe","C:\_work\Fred\MAJ_Auto\Mafeuille.xls","") 
      StartTimer(1,150,@CPU()) 
      
Repeat 
 ; Event = WaitWindowEvent() 
Until a=1 ;je lui dis qu'il boucle tant quepas a=1 (il devrait donc s'arrêter apres l'affichage de messagerequester)
End

Soit ça plante (peut-être parceque j'invente detrucs (hum...))
soit il boucle pas jusqu'a tempsque ok pourpasser a END...

quelqu'un a une idée?? ça avait l'air bien le a=...
je pense que j'ai juste oublié l'essentiel, isn't it??!!

A NOTER QUE LA MESSAGEREQUESTER C'EST POUR BIEN VOIR QUE
CA FONCTIONNE MAIS QUE DANS MON VRAI PROG OU JE VEUX L'INTEGRER IL N'Y AURA SURTOUT PAS D'AFFICHAGE DE CE TYPE(PASSERA ALA SUITE DU PROG SANS ATTENDRE D'APPUIE SUR UNE TOUCHE)

Merci d'avance
David

david a écrit : quelqu'un a une idée?? ça avait l'air bien le a=...
je pense que j'ai juste oublié l'essentiel, isn't it??!!

tu oublie un detail heu ... de taille

une variable dans une procedure est LOCAL a la procedure !!

du coup le "a=" dans la procedure n'est pas le meme que le "a=" en dehors !!

soit tu partage le "a=" qui est dans la procedure en spécifiant "Shared" (voir Doc)

soit tu déclare ton "a" en Global au debut du listing

Mmmmmh... Mis à part que je ne comprends pas ton code vu que je ne vois pourquoi tu n'a pas mis a en global ce qui serait quand même rudement utile, je voudrais signaler que c'est tres hasardeux de risque le fonctionnement d'un logiciel sur sa conso CPU... Par exemple, sur ma machine, jamais exel ne prendra 5%...

Edit: grilled

super (et super facile)

je connaissais pas mais je me disais bien que je passais
a coté d'une chose simple

deja vu doc
deja testé (en 1min et tout est ok)

trop cool
trop rapide
trop sympa
trop PureBasic

euh dobro,

juste pour dire que c'est sympa de répondre aussi vite
et d'aider tous les débutants et moins débutant en recherche d'information

<PS: TROP BELLE TA GUITARRE

poshu a écrit :Edit: grilled

+1

david a écrit :euh dobro,

juste pour dire que c'est sympa de répondre aussi vite
et d'aider tous les débutants et moins débutant en recherche d'information

<PS: TROP BELLE TA GUITARRE

Merci

tu peux meme l'entendre ici

http://www.dailymotion.com/Dobro8/video ... aven_music

C beau!!!

RV a écrit :C beau!!!

Merci si tu trouve ça cool tu peut écouter aussi mes autres interpretations
ici (il y a 4 pages

)

http://www.dailymotion.com/Dobro8/1

Pure Dobro

@Dobro

J'ai déjà regardé! (d'ailleurs courbettes)!

mais il manque toujours ça!
http://fr.youtube.com/watch?v=JsHKoJM8uv8

A ta sauce, j'aimerais bien écouter!

(SpaceMan voulait relever le défi)

Moi je trouve la vidéo très bonne mais que cette chanson est soporifique !

RV a écrit :@Dobro

J'ai déjà regardé! (d'ailleurs courbettes)!

mais il manque toujours ça!
http://fr.youtube.com/watch?v=JsHKoJM8uv8

A ta sauce, j'aimerais bien écouter!

(SpaceMan voulait relever le défi)

franchement c'est vraiment pas dur a jouer...

mon problème c'est pas la guitare, mais le Chant !!

j'ai chanté 2-3 chansons, parce qu'on avait insisté et pour l'humour, mais franchement chanter c'est pas pour moi, hum! surtout en anglais

mais ce que fait le gars a la guitare c'est du niveau débutant (ya que 4 accords, rien de bien sorcier, je t'assure

)

je peux facilement d'oreille te trouver les accords, si tu veux

tiens ça tourne sur :

G /B /C /Cm

avec un petit 7em a chaque fin de case

en faite réellement ça donne

G-Gsus4-G-Gsus4/B-B7-B-B7/C-C7-C-C7/Cm-Cm7-Cm-Cm7

voila tres simple

j'ai pas vraiment lu tout ce dont parle le topic mais windows (win32 en tout cas) repose sur un système de messages. excel (à mon avis =) traite ses messages. donc si on le lance, on doit être capable de lui adresser un message (pas forcément besoin d'un handle me semble-t-il) et "attendre" qu'il réponde pour le considérer chargé. c'est peut-être une idée à creuser.

Dri

@Dobro
Je me doutais que c'était pas si dur que ca à jouer et justement je voulais derriere te mettre à l'amande côté chant

...loupé!

J'en trouverai d'autres...pas grave!

[Edit] C'est sur Dr.Dri, je suis hors sujet!
D'ailleurs escuse-moi David!

PureBasic

pb repeat until et variable de controle

pb repeat until et variable de controle

Re: pb repeat until et variable de controle