Rilevare se un token di front end è disponibile per l'esecuzione

Question

Come posso rilevare se è disponibile un front end token da eseguire? In alternativa, come posso rilevare se un token di front-end non è stato eseguito?

Esempio: il comando Modifica -> Copia non è disponibile se non è selezionato nulla. FrontEndTokenExecute["Copy"] semplicemente emetterà un segnale acustico in questo caso, ma non fornisce alcuna indicazione (programmatica) che non sia riuscita.

Answer 1

Ho trovato un metodo per affrontare la seconda domanda, ma non è elegante:

1. In Preferences > Interface > Message and Warning actions set avvertimenti minori all'interfaccia utente a Beep e Stampa per console
2. assicurarsi che ci sia almeno un messaggio di errore nella finestra dei messaggi
3. Ottenere un handle per il blocco note della finestra del notebook (utilizzando Notebooks[] o giù di lì)
4. Conservare l'ultima cella nel notebook messaggio utilizzando NotebookGet[NotebookObject[FrontEndObject[LinkObject["55d_shm", 1, 1]], 1]]/. Notebook[{___, Cell[a___]}, ___] :> Cell[a] (il vostro maniglia sarà diverso, ovviamente)
5. La vostra chiamata: FrontEndTokenExecute [ "Copia"]
6. l'ultima è messaggio di errore e verificare se si differenzia da quello memorizzata al punto 4.
7. La cella errore sembra Cell["You tried to edit a cell that is not editable. You can make the \ cell editable by choosing Cell Editable in the Cell Properties \ submenu.", "Message", "Message", "MSG", PageWidth -> WindowWidth, ShowCellLabel -> True, CellChangeTimes -> {3.534442831*10^9}, CellTags -> "cantEditLockedCell"]
8. legge in modo appropriato