funzioneScopo
Ritorna il nome del file immagine utilizzato come icona di un determinato comando contenuto nel CommandSet.
Sintassi
string CommandIcon = "" // Stringa che conterrà il percorso dell'icona
//
CommandIcon := CommandSet.GetCommandIcon(index)
//
CommandIcon := CommandSet.GetCommandIcon(index)
Argomenti
| Index | E' un numero intero rappresentante l'indice dell'oggetto Command all'interno del CommandSet. |
Valore di ritorno
Viene ritornata una stringa che contiene il nome del file immagine utilizzato come icona dell'oggetto Command specificato.
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.Impostacategoria.OnCommand(
int CommandNumber //
int Index //
inout boolean Cancel //
)
{
// Se il comando è abilitato e visibile
if Impostacategoria.GetCommandEnabled(Index) AND Impostacategoria.
GetCommandVisible(Index)
{
// Metto nel campo idcategoria il code del comando
// cliccato dall'utente, identificato tramite l'argomento Index
Prodotti.IdCategoria := ToInteger(Impostacategoria.GetCommandCode(
Index))
}
//
// Scrivo nel Debug il percorso del file icona rappresentante il comando
EsempiGL.DTTLogMessage(FormatMessage(Icona del comando: |1,
Impostacategoria.GetCommandIcon(Index), ??, ??, ??, ??), ??, ??)
//
// Mostro il messaggio dell'operazione eseguita
EsempiGL.MessageBox(FormatMessage(Impostata categoria |1, Impostacateg-
oria.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.Impostacategoria.OnCommand(
int CommandNumber //
int Index //
inout boolean Cancel //
)
{
// Se il comando è abilitato e visibile
if Impostacategoria.GetCommandEnabled(Index) AND Impostacategoria.
GetCommandVisible(Index)
{
// Metto nel campo idcategoria il code del comando
// cliccato dall'utente, identificato tramite l'argomento Index
Prodotti.IdCategoria := ToInteger(Impostacategoria.GetCommandCode(
Index))
}
//
// Scrivo nel Debug il percorso del file icona rappresentante il comando
EsempiGL.DTTLogMessage(FormatMessage(Icona del comando: |1,
Impostacategoria.GetCommandIcon(Index), ??, ??, ??, ??), ??, ??)
//
// Mostro il messaggio dell'operazione eseguita
EsempiGL.MessageBox(FormatMessage(Impostata categoria |1, Impostacateg-
oria.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.
- Se il comando non ha l'icona il valore di ritorno sarà stringa vuota.
- Uno dei possibili utilizzi è quello di personalizzare i messaggi mostrati all'utente con l'icona del comando selezionato, non necessariamente nota in fase di progettazione ma anche impostata dinamicamente con la funzione SetCommandIcon. In applicazioni web è possibile inserire codice HTML nei messaggi visualizzati mediante la funzione ShowMessage, per mostrare l'icona del comando eseguito è sufficiente inserire nel messaggio il codice "<img src="images/" + Command.GetCommandIcon() +">".
Ultima modifica: 23/03/2021 / Validità: da 6.5.2680