Mikelius (Member)
Expert
 
Messaggi: 525
Iscritto: 14/04/2017
|
Anche a me funziona senza sender as short.
Per scrivere i tasti sul menu' io puoi usare la proprietà "ShortcutKeyDisplayString" . Quest rende incolonnati Testo del Menu' e Tasti, a mio avvivo un tantino più belli da vedere.
"Codice dentro .designer.vb"
Codice sorgente - presumibilmente Plain Text |
AzzeraToolStripMenuItem.ShortcutKeyDisplayString = "O"
Back1PassoToolStrip.ShortcutKeyDisplayString = " Z"
EsciToolStripMenuItem.ShortcutKeyDisplayString = "ESC"
ImmaginiSet1ToolStrip.ShortcutKeyDisplayString = "1"
ImmaginiSet2ToolStrip.ShortcutKeyDisplayString = "2"
ImmaginiSet3ToolStrip.ShortcutKeyDisplayString = "3"
ImmaginiSet4ToolStrip.ShortcutKeyDisplayString = "4"
ImmaginiSet5ToolStrip.ShortcutKeyDisplayString = "5"
ImmaginiSet6ToolStrip.ShortcutKeyDisplayString = "6"
ImmaginiSet7ToolStrip.ShortcutKeyDisplayString = "7"
ImmaginiSet8ToolStrip.ShortcutKeyDisplayString = "8"
VediSetimmaginiToolStrip.ShortcutKeyDisplayString = "V"
|
Una domanda, come mai preferisci che premendo il pulsante X in alto a destra, non spunti la MessageBox di chiusura?
Ultima modifica effettuata da Mikelius il 21/06/2018 alle 21:53 |
|
|
Ultimo (Member)
Guru
Messaggi: 877
Iscritto: 22/05/2010
|
@Carlo
@Mikelius
avete provato a premere i tasti da 1 a 8 col codice
della versione che ho inserito ?
Mikelius, ok si può modificare, per la chiusura dal tasto X
non ho inserito l'avviso, si può inserire.
If ok Then GOTO Avanza else GOTO Inizia
|
|
|
Ultimo (Member)
Guru
Messaggi: 877
Iscritto: 22/05/2010
|
@Mikelius
@Carlo
Ho reinserito una nuova versione 9.3.3
ho corretto il codice, adesso funziona 
If ok Then GOTO Avanza else GOTO Inizia
|
|
|
Mikelius (Member)
Expert
Messaggi: 525
Iscritto: 14/04/2017
|
Postato originariamente da Ultimo:
@Mikelius
@Carlo
Ho reinserito una nuova versione 9.3.3
ho corretto il codice, adesso funziona |
Non ho visto l'ultimo codice, ma ho scoperto il problema del precendete.
Io tramite il Menu' chiamavo l'evento che a sua volta richiamava la routine
ImmSet_Click(), mentre col tasto richiamavo direttamente la routine in questione.
Tu invece con i tasti richiami sempre l'evento che ha problemi a reperire l'integer del TAG.
Ecco perchè dava errore |
|
|
Ultimo (Member)
Guru
Messaggi: 877
Iscritto: 22/05/2010
|
Postato originariamente da Mikelius:
Postato originariamente da Ultimo:
@Mikelius
@Carlo
Ho reinserito una nuova versione 9.3.3
ho corretto il codice, adesso funziona |
Non ho visto l'ultimo codice, ma ho scoperto il problema del precendete.
Io tramite il Menu' chiamavo l'evento che a sua volta richiamava la routine
ImmSet_Click(), mentre col tasto richiamavo direttamente la routine in questione.
Tu invece con i tasti richiami sempre l'evento che ha problemi a reperire l'integer del TAG.
Ecco perchè dava errore |
Giusto, infatti ho modificato il codice dei tasti
ora chiamano direttamente la routine
If ok Then GOTO Avanza else GOTO Inizia
|
|
|
Carlo (Member)
Guru
Messaggi: 1344
Iscritto: 29/01/2018
|
Postato originariamente da Mikelius:
Postato originariamente da Ultimo:
@Mikelius
@Carlo
Ho reinserito una nuova versione 9.3.3
ho corretto il codice, adesso funziona |
Non ho visto l'ultimo codice, ma ho scoperto il problema del precendete.
Io tramite il Menu' chiamavo l'evento che a sua volta richiamava la routine
ImmSet_Click(), mentre col tasto richiamavo direttamente la routine in questione.
Tu invece con i tasti richiami sempre l'evento che ha problemi a reperire l'integer del TAG.
Ecco perchè dava errore |
Confermo, i numeri non funzionavano, codice vecchio e nuovo mescolato, ora ok!
@Ultimo
Ho visto che non hai ancora inserito TipoGrafica1, la lista colori elimina un bel po' di ElseIf
Sul menu Selezione Set Immagini, le voci Set1 e Set4 hanno uno spazio a sinistra.
Tutte le modifiche, che hanno compattato il codice, mi piacciono.
Manca la guida e l'autosoluzione (ci metterò mano al più presto) 
in programmazione tutto è permesso |
|
|
Carlo (Member)
Guru
Messaggi: 1344
Iscritto: 29/01/2018
|
Postato originariamente da Mikelius:
Per scrivere i tasti sul menu' io puoi usare la proprietà "ShortcutKeyDisplayString" . Quest rende incolonnati Testo del Menu' e Tasti, a mio avvivo un tantino più belli da vedere.
"Codice dentro .designer.vb"
Codice sorgente - presumibilmente Plain Text |
AzzeraToolStripMenuItem.ShortcutKeyDisplayString = "O"
Back1PassoToolStrip.ShortcutKeyDisplayString = " Z"
EsciToolStripMenuItem.ShortcutKeyDisplayString = "ESC"
ImmaginiSet1ToolStrip.ShortcutKeyDisplayString = "1"
ImmaginiSet2ToolStrip.ShortcutKeyDisplayString = "2"
ImmaginiSet3ToolStrip.ShortcutKeyDisplayString = "3"
ImmaginiSet4ToolStrip.ShortcutKeyDisplayString = "4"
ImmaginiSet5ToolStrip.ShortcutKeyDisplayString = "5"
ImmaginiSet6ToolStrip.ShortcutKeyDisplayString = "6"
ImmaginiSet7ToolStrip.ShortcutKeyDisplayString = "7"
ImmaginiSet8ToolStrip.ShortcutKeyDisplayString = "8"
VediSetimmaginiToolStrip.ShortcutKeyDisplayString = "V"
|
|
Si setta anche il ShortcutKeyDisplayString...?  scontato, dopo che lo sai... 
E' sempre una buona cosa guardare dentro al designer, si capiscono un sacco di cose.
Il ShortcutKeyDisplayString si setta anche da proprietà Ultima modifica effettuata da Carlo il 22/06/2018 alle 12:09
in programmazione tutto è permesso |
|
|
Ultimo (Member)
Guru
Messaggi: 877
Iscritto: 22/05/2010
|
@Carlo
Ho visto gli spazi
non l'avevo notato,
la lista colori la devo aggiungere
If ok Then GOTO Avanza else GOTO Inizia
|
|
|
Carlo ha allegato un file: shortcut.png (114705 bytes)