Scopo
Ritorna il codice azione di un determinato comando del CommandSet.
Sintassi
string CmdCode //Conterrà il codice del comando
//
CmdCode := CommandSet.GetCommandActionCode(index)
//
CmdCode := CommandSet.GetCommandActionCode(index)
Argomenti
Index | E' un numero intero rappresentante l'indice del Command all'interno del CommandSet. |
Valore di ritorno
Viene ritornata una stringa contenente il codice azione del Command indicato.
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.GetCommandActionCode(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.GetCommandActionCode(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), ??, ??, ??, ??))
}
- Un possibile utilizzo è quello di impostare nell'evento di OnOpenPopup il codice azione e di leggerlo poi nell'evento di OnCommand per sapere quale comando è stato attivato. L'esempio on line sfrutta questa modalità.
- 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.
- 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.
- Un altro possibile utilizzo di questa procedura è quello di memorizzare all'interno della proprietà Code del comando un dato che verrà poi estratto dall'evento di OnCommand, permettendo così di eseguire l'operazione giusta.
- In versione 22.0 la funzione è stata rinominata da GetCommandCode a GetCommandActionCode.
Ultima modifica: 21/03/2022 / Validità: da 6.5.2680