une Horloge Tectonic

Partagez votre expérience de PureBasic avec les autres utilisateurs.
Backup
Messages : 14526
Inscription : lun. 26/avr./2004 0:40

une Horloge Tectonic

Message par Backup »

..................
Dernière modification par Backup le lun. 08/oct./2012 12:38, modifié 1 fois.
Le Soldat Inconnu
Messages : 4312
Inscription : mer. 28/janv./2004 20:58
Localisation : Clermont ferrand OU Olsztyn
Contact :

Re: une Horloge Tectonic

Message par Le Soldat Inconnu »

Ça clignote par contre

L'utilisation d'un Canvasgadget peut surement arranger l'affaire.

Sinon, il faut tous dessiner dans une image temporaire pour dessiner l'image sur la fenêtre.

Et pour limiter l'utilisation du processeur, une petite modif comme ceci ?

Code : Tout sélectionner

Repeat ; boucle principale  
		; 
		; ************************* 
		
		Event=WaitWindowEvent(100) ; on regarde si quelqu'un a cliqué sur la croix pour quitter
		
		Date = Date() 
		Heure=Hour(Date)
		Minute = Minute(Date)
		Seconde=Second(Date) 
		
		Select Event 
Je ne suis pas à moitié Polonais mais ma moitié est polonaise ... Vous avez suivi ?

[Intel quad core Q9400 2.66mhz, ATI 4870, 4Go Ram, XP (x86) / 7 (x64)]
Backup
Messages : 14526
Inscription : lun. 26/avr./2004 0:40

Re: une Horloge Tectonic

Message par Backup »

Le Soldat Inconnu a écrit :Ça clignote par contre
oui c'est dut au

Code : Tout sélectionner

  ; ******** dessin du rond d'effacement *************
      StartDrawing(WindowOutput(#fenetre))
         Circle(xa, ya, 100 ,RGB(0,0,0)) 
      StopDrawing()   
      ; **********************************************
j'utilisai un Rond noir pour effacer le speudo ecran :)
a l’époque le canvas n'existait pas :)

Code : Tout sélectionner

Event=WaitWindowEvent(100)

oui c'est vrais :)
Répondre