Scopo
Ritorna True se un determinato comando del CommandSet è abilitato, False altrimenti.
Sintassi
boolean CommandEnabled = 0 //
//
CommandEnabled := CommandSet.GetCommandEnabled(index)
//
CommandEnabled := CommandSet.GetCommandEnabled(index)
Argomenti
Index | E' un numero intero che rappresenta l'indice del Command all'interno del CommandSet. |
Valore di ritorno
Ritorna True se l'oggeto Command è abilitato, False altrimenti.
Esempio di codice
// ****************************************************************************
// Utilizzo l'evento di OnCommand del CommandSet per impostare il valore
// IDCategoria del prodotto corrente come il Code del Command eseguito.
// Nell'evento di OnOpenPopup i comandi sono stati modificati per contenere
// nella caption il nome di una categoria e nel code il relativo ID.
// ****************************************************************************
event Prodotti.CommandSet.OnCommand(
int CommandNumber //
int Index //
inout boolean Cancel //
)
{
// Se il comando è abilitato e visibile
if CommandSet.GetCommandEnabled(Index) AND CommandSet.GetCommandVisible(
Index)
{
// Metto nel campo idcategoria il code del comando
// cliccato dall'utente, identificato tramite l'argomento Index
Prodotti.IdCategoria := ToInteger(CommandSet.GetCommandCode(Index))
}
//
// Scrivo nel Debug il percorso del file icona rappresentante il comando
EsempiGL.DTTLogMessage(FormatMessage(Icona del comando: |1, CommandSet.
GetCommandIcon(Index), ??, ??, ??, ??), ??, ??)
//
// Mostro il messaggio dell'operazione eseguita
EsempiGL.MessageBox(FormatMessage(Impostata categoria |1, CommandSet.
GetCommandCaption(Index), ??, ??, ??, ??))
}
// Utilizzo l'evento di OnCommand del CommandSet per impostare il valore
// IDCategoria del prodotto corrente come il Code del Command eseguito.
// Nell'evento di OnOpenPopup i comandi sono stati modificati per contenere
// nella caption il nome di una categoria e nel code il relativo ID.
// ****************************************************************************
event Prodotti.CommandSet.OnCommand(
int CommandNumber //
int Index //
inout boolean Cancel //
)
{
// Se il comando è abilitato e visibile
if CommandSet.GetCommandEnabled(Index) AND CommandSet.GetCommandVisible(
Index)
{
// Metto nel campo idcategoria il code del comando
// cliccato dall'utente, identificato tramite l'argomento Index
Prodotti.IdCategoria := ToInteger(CommandSet.GetCommandCode(Index))
}
//
// Scrivo nel Debug il percorso del file icona rappresentante il comando
EsempiGL.DTTLogMessage(FormatMessage(Icona del comando: |1, CommandSet.
GetCommandIcon(Index), ??, ??, ??, ??), ??, ??)
//
// Mostro il messaggio dell'operazione eseguita
EsempiGL.MessageBox(FormatMessage(Impostata categoria |1, CommandSet.
GetCommandCaption(Index), ??, ??, ??, ??))
}
- Gli indici di posizione dell'oggetto Command all'interno del CommandSet vanno da 0 a GetCommandsCount - 1. E' possibile ottenere l'indice di un comando mediante la funzione GetIndex dell'oggetto Command.
Ultima modifica: 23/03/2021 / Validità: da 6.5.2680