funzioneScopo
Ritorna un valore che specifica solo la data corrente in base all'impostazione della data di sistema.
Sintassi
date t = #1899/12/30# // Leggo il risultato della funzione
//
t := Today()
//
t := Today()
Argomenti
Questa funzione non ha argomenti.Valore di ritorno
Restituisce un valore di tipo Date corrispondente alla data corrente in base all'impostazione della data di sistema.
Esempio di codice
// *********************************************************************
// Evento notificato alla videata al momento del caricamento in memoria.
// *********************************************************************
event Calcolatore.Load()
{
// Inizializzazione
Operandi.Op1 := ToString(C12)
Operandi.Op2 := ToString(C3)
Operandi.Op1bool := False
Operandi.Op2bool := True
Operandi.Op1date := C15/12/2008
Operandi.Op2date := C12/10/2008
Operandi.OP1math := ToString(C12.5)
//
// Imposto la data corrente separandone le informazioni
Datatempo.Anno := Year(Today())
Datatempo.Mese := Month(Today())
Datatempo.Giorno := Day(Today())
//
// Imposto l'orario corrente separandone le informazioni
Datatempo.Ora := Hour(Time())
Datatempo.Minuto := Minute(Time())
Datatempo.Secondo := Second(Time())
//
// Prima Esecuzione
this.EseguiCalcoloTraNumeri()
this.Eseguicalcolitrastringhe()
this.Eseguicalcolitradate()
this.Eseguicalcolilogici()
this.Eseguicalcolimatematici()
this.Verificadate()
}
// Evento notificato alla videata al momento del caricamento in memoria.
// *********************************************************************
event Calcolatore.Load()
{
// Inizializzazione
Operandi.Op1 := ToString(C12)
Operandi.Op2 := ToString(C3)
Operandi.Op1bool := False
Operandi.Op2bool := True
Operandi.Op1date := C15/12/2008
Operandi.Op2date := C12/10/2008
Operandi.OP1math := ToString(C12.5)
//
// Imposto la data corrente separandone le informazioni
Datatempo.Anno := Year(Today())
Datatempo.Mese := Month(Today())
Datatempo.Giorno := Day(Today())
//
// Imposto l'orario corrente separandone le informazioni
Datatempo.Ora := Hour(Time())
Datatempo.Minuto := Minute(Time())
Datatempo.Secondo := Second(Time())
//
// Prima Esecuzione
this.EseguiCalcoloTraNumeri()
this.Eseguicalcolitrastringhe()
this.Eseguicalcolitradate()
this.Eseguicalcolilogici()
this.Eseguicalcolimatematici()
this.Verificadate()
}
Ultima modifica: 03/09/2018 / Validità: da 7.0.3200