funzioneScopo
Ritorna True se la videata è attualmente aperta. Può essere utile per aggiornare i dati presenti in altre videate a causa dei cambiamenti effettuati in quella attiva; di solito, infatti, tali aggiornamenti devono essere effettuati solo se la videata da aggiornare è aperta.
Sintassi
boolean Aperto = False //
//
Aperto := Form.IsOpen()
//
Aperto := Form.IsOpen()
Valore di ritorno
Ritorna True se il form è aperto, False altrimenti
Esempio di codice
// ***************************************************
// Fired when a panel command is about to be executed.
// ***************************************************
event Prodotti.Prodotti.OnCommand(
int Command // Command issued
inout boolean Cancel // Set to TRUE to cancel the command
)
{
// Se viene richiesto il salvataggio dei dati
if Command = Update
{
// Se i dati sono effettivamente modificati
if Prodotti.Status() = UPDATED
{
// Se il form ordini è aperto mostro un messaggio sia sul form Prodotti
// che sul form Ordini per ricordare all'utente di rinfrescare i dati
// del dettaglio ordine, che potrebbero essere cambiati
if Ordini.IsOpen()
{
// Se i dettagli ordini non sono modificati posso direttamente
// aggiornare i dati
if Ordini.DettagliOrdini.Status() = DATA
{
// Imposto la variabile locale RefreshOrdini a true, nell'evento di
// AfterCommit se questa variabile è True verranno aggiornati i dati
// del panel Dettagli ordini
this.RefreshDettagliOrdini := True
this.ShowMessage(INFO, Sono stati aggiornati dei prodotti...,
??, ??, ??)
Ordini.ShowMessage(INFO, Sono stati aggiornati dei prodotti...
, ??, ??, ??)
}
else // Altrimenti informo l'utente dell'aggiornamento necessari...
{
this.ShowMessage(WARN, Attenzione! Sono stati aggiornati dei
prodotti..., ??, ??, ??)
Ordini.ShowMessage(WARN, Attenzione! Sono stati aggiornati dei
prodotti..., ??, ??, ??)
}
}
}
}
}
// Fired when a panel command is about to be executed.
// ***************************************************
event Prodotti.Prodotti.OnCommand(
int Command // Command issued
inout boolean Cancel // Set to TRUE to cancel the command
)
{
// Se viene richiesto il salvataggio dei dati
if Command = Update
{
// Se i dati sono effettivamente modificati
if Prodotti.Status() = UPDATED
{
// Se il form ordini è aperto mostro un messaggio sia sul form Prodotti
// che sul form Ordini per ricordare all'utente di rinfrescare i dati
// del dettaglio ordine, che potrebbero essere cambiati
if Ordini.IsOpen()
{
// Se i dettagli ordini non sono modificati posso direttamente
// aggiornare i dati
if Ordini.DettagliOrdini.Status() = DATA
{
// Imposto la variabile locale RefreshOrdini a true, nell'evento di
// AfterCommit se questa variabile è True verranno aggiornati i dati
// del panel Dettagli ordini
this.RefreshDettagliOrdini := True
this.ShowMessage(INFO, Sono stati aggiornati dei prodotti...,
??, ??, ??)
Ordini.ShowMessage(INFO, Sono stati aggiornati dei prodotti...
, ??, ??, ??)
}
else // Altrimenti informo l'utente dell'aggiornamento necessari...
{
this.ShowMessage(WARN, Attenzione! Sono stati aggiornati dei
prodotti..., ??, ??, ??)
Ordini.ShowMessage(WARN, Attenzione! Sono stati aggiornati dei
prodotti..., ??, ??, ??)
}
}
}
}
}
- Un form può essere aperto sia dall'utente tramite i comandi di menù; sia tramite il Visual Code chiamando una procedura della libreria form oppure una procedura Visual Code in essa contenuta. Il form rimane aperto finchè non viene chiuso dall'utente o dal Visual Code tramite la procedura Close.
- L'elenco dei form aperti viene visualizzato sotto il menù. Tuttavia esso non visualizza i form che hanno la proprietà Caption impostata a stringa vuota.
Ultima modifica: 23/03/2021 / Validità: da 6.5.2680