Xhack

Un forum dedicato all'hacking
 
IndiceIndice  PortalePortale  CalendarioCalendario  FAQFAQ  CercaCerca  RegistratiRegistrati  Lista UtentiLista Utenti  GruppiGruppi  Accedi  

Condividi | 
 

 orologi vari..

Andare in basso 
AutoreMessaggio
darkjoker
Admin
Admin
avatar

Numero di messaggi : 813
Data d'iscrizione : 30.07.07

MessaggioTitolo: orologi vari..   Ven Nov 02, 2007 5:59 pm

Questo programma Ŕ un semplice orologio guizzato... praticamente ho fatto in modo che esso venisse aggiornato ogni 1000 millisecondi (1 secondo)...
Se provate ad uscire non succederÓ niente, perchŔ il programma uscirÓ velocissimamente da Select e passerÓ subito all'aggiornamento.
per uscire vi basterÓ cliccare sull'icona che vi compare affianco all'orologio di sistema (la TrayIcon)




Codice:

#include <GUIConstants.au3>
guicreate ("Clock", 150, 80)
$var = @wday
$data = ""
if $var = 1 Then
   $data = "Domenica, "
ElseIf $var = 2 Then
   $data = "Lunedý, "
ElseIf $var = 3 Then
   $data = "Martedý, "
ElseIf $var = 4 Then
   $data = "Mercoledý, "
ElseIf $var = 5 Then
   $data = "Giovedý, "
ElseIf $var = 6 Then
   $data = "Venerdý, "
ElseIf $var = 7 Then
   $data = "Sabato, "
EndIf
$data = $data & @MDAY
$var2 = @MON
if $var2 = 01 Then
   $data = $data & " Gennaio "
elseif $var2 = 02 Then
   $data = $data & " Febbraio "
elseif $var2 = 03 Then
   $data = $data & " Marzo "
elseif $var2 = 04 Then
   $data = $data & " Aprile "
elseif $var2 = 05 Then
   $data = $data & " Maggio "
elseif $var2 = 06 Then
   $data = $data & " Giugno "
elseif $var2 = 07 Then
   $data = $data & " Luglio "
elseif $var2 = 08 Then
   $data = $data & " Agosto "
elseif $var2 = 09 Then
   $data = $data & " Settembre "
elseif $var2 = 10 Then
   $data = $data & " Ottobre "
elseif $var2 = 11 Then
   $data = $data & " Novembre "
elseif $var2 = 12 Then
   $data = $data & " Dicembre "
EndIf
$data = $data & @YEAR
$clock = GUICtrlCreateLabel (@hour&':'&@MIN&":"&@SEC, 10, 20)
$date = GUICtrlCreateLabel ($data, 10, 40)
GUISetState ()
While 1
    $msg = GUIGetMsg()
    Select
   Case $msg = $GUI_EVENT_CLOSE
      Exit
EndSelect
   sleep (1000)
   GUICtrlSetData ($clock, @hour&':'&@MIN&":"&@SEC)
   $var = @wday
   $data = ""
   if $var = 1 Then
      $data = "Domenica, "
   ElseIf $var = 2 Then
      $data = "Lunedý, "
   ElseIf $var = 3 Then
      $data = "Martedý, "
   ElseIf $var = 4 Then
      $data = "Mercoledý, "
   ElseIf $var = 5 Then
      $data = "Giovedý, "
   ElseIf $var = 6 Then
      $data = "Venerdý, "
   ElseIf $var = 7 Then
      $data = "Sabato, "
   EndIf
   $data = $data & @MDAY
   $var2 = @MON
   if $var2 = 01 Then
      $data = $data & " Gennaio "
   elseif $var2 = 02 Then
      $data = $data & " Febbraio "
   elseif $var2 = 03 Then
      $data = $data & " Marzo "
   elseif $var2 = 04 Then
      $data = $data & " Aprile "
   elseif $var2 = 05 Then
      $data = $data & " Maggio "
   elseif $var2 = 06 Then
      $data = $data & " Giugno "
   elseif $var2 = 07 Then
      $data = $data & " Luglio "
   elseif $var2 = 08 Then
      $data = $data & " Agosto "
   elseif $var2 = 09 Then
      $data = $data & " Settembre "
   elseif $var2 = 10 Then
      $data = $data & " Ottobre "
   elseif $var2 = 11 Then
      $data = $data & " Novembre "
   elseif $var2 = 12 Then
      $data = $data & " Dicembre "
   EndIf
   $data = $data & @YEAR
   guictrlsetdata ($date, $data)
Wend

_________________
L'unico computer sicuro, Ŕ un computer spento.

Nel software esiste sempre almeno un bug, generalmente Ŕ localizzabile tra la tastiera e la sedia

Torna in alto Andare in basso
Visualizza il profilo
darkjoker
Admin
Admin
avatar

Numero di messaggi : 813
Data d'iscrizione : 30.07.07

MessaggioTitolo: Re: orologi vari..   Ven Nov 02, 2007 7:05 pm

questa Ŕ una variabile che fornisce solo l'ora (ma volendo si puo aggiungere anche la data )
ma Ŕ esteticamente piu bella, e poi avete l'ora sempre a portata di mouse...
quest'orologio Ŕ stato fatto con una tooltip, e potrebbe essere utile per chi ha deciso di nascondere la barra in basso, consentendogli di vedere l'ora senza andare ogni volta a farla spuntare fuori... Wink
eccovi lo script:
Codice:

While 1
ToolTip(@HOUR&':'&@MIN&":"&@SEC, 0, 0); ToolTip (testo, posizione x, posizione y)
sleep (1000); riposo per 1 secondo e poi ricomincia il ciclo (cosi sarÓ aggiornato )
WEnd

_________________
L'unico computer sicuro, Ŕ un computer spento.

Nel software esiste sempre almeno un bug, generalmente Ŕ localizzabile tra la tastiera e la sedia

Torna in alto Andare in basso
Visualizza il profilo
certaindeath
Admin
Admin
avatar

Numero di messaggi : 343
Data d'iscrizione : 30.07.07

MessaggioTitolo: Re: orologi vari..   Lun Nov 05, 2007 6:34 pm

per visualizzare l'ora si pu˛ anche attraverso la funzione SplashTextOn(per chi trova la gui troppo complicata e la tool tip troppo piccola)
Torna in alto Andare in basso
Visualizza il profilo
Contenuto sponsorizzato




MessaggioTitolo: Re: orologi vari..   

Torna in alto Andare in basso
 
orologi vari..
Torna in alto 
Pagina 1 di 1
 Argomenti simili
-
» Widget orologio digitale (in tempo reale) - Codice HTML
» Arduino progetto con buzzer e led
» Fritzbox 3490 problemi vari, soprattutto con la WI-FI

Permessi di questa sezione del forum:Non puoi rispondere agli argomenti in questo forum
Xhack :: Programmazione :: Autoit-
Vai verso: