Discussion :

[devquipeut]

Bonjour à vous tous,
je ne suis pas un roi de la programmation et vous allez vite vous en apercevoir.
Cependant, je cherche à me débrouiller la plupart du temps, mais là...je rame quelle que soit la façon dont je m'y prenne...

voilà mon soucis...
je suis sous windev 17 et je dois gérer l'envoi de sms depuis l'appli android que j'ai fait.Bon rien de compliquer à la base sauf....

sauf que je dois envoyé à une personne un sms contenant une info importante relative à mon travail.
je dois pouvoir indiquer en variable l'heure à laquelle le sms doit être envoyé (travaillant de nuit, je ne peut envoyer ce sms en temps réel à mon supérieur et autres...)

mon problème , je ne sais pas gérer les thread, dans mon code quelle que soit le moyen que j'utilise tantque, boucle etc... ça occupe à fond le processeur et android sur une longue attente le crois planté.c'est sûr que je m'y prends mal
je vous tend la perche... à l'aide les amis
comment ne pas saturer l'appli, je ne peux meme pas fermer la fenêtre quand il verifie l'heure.
je souhaiterais pouvoir fermer la fenêtre et que cela continue de se faire(l attente de l'envoi) en arriere plan, là ça serait le must...

mon code de compétition...avec Boucle

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
HeureAct est un entier     // var
Heure_programmée est un entier     //var
heure_programmée = SAI_prog_heure_sms     // pour convertir en entier la valeur de la saisie sinon ça bug
						              //SAI_prog_heure_sms est la zone sde saisie ou est donné l'heure
 
	BOUCLE
	HeureAct = Gauche(HeureSys(), 4) 
	   SI  heure_programmée=HeureAct ALORS SORTIR
	   FIN
 
      // envoi du sms  ignoré pour l'instant pour ne pas planter le simulateur windev
      //SMS.Numéro = "000000000"
     //SMS.Message ="incident sur machine"
	//SMSEnvoie()
 
	    info("Envoie du SmS")                        // pour simuler un envoi correct

mon code avec tantque

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
			heure_programmée = SAI_prog_heure_sms    // pour convertir en entier la valeur de la saisie
 
			TANTQUE heure_programmée-HeureAct <>0			  
			HeureAct = Gauche(HeureSys(), 4) 
				SI  heure_programmée=HeureAct ALORS
								//SMS.Numéro = "000000000"
								//SMS.Message ="incident sur machine"
								//SMSEnvoie()
                                                                info("envoi sms réussi")
								FIN			
				FIN
 
FIN

les codes font le même résultat...ça rame
sinon ça marche coté fonctionnel mais ne rends pas la main tant que c'est pas fini


merci d'avance à vous

[devquipeut]

ok les amis
bon désolé !
je m'y prenais mal
j'ai utiliser timersys avec ma procedure qui va bien et c'est bon !

bon dev' à tous