Как ответить на аккорд клавиатуры и заменить введенную альфа-клавишу специальной?
Я хочу, чтобы в текстовом поле в приложении WinForms с использованием C# некоторые аккорды клавиатуры заменялись специальными символами. Например, если пользователь вводит "Ctrl+A", я хочу вставить в текстовое поле символ "á"; если пользователь вводит "Ctrl+Shift+A", я хочу вставить в текстовое поле символ "Á" и т. д.
Исходя из того, что я нашел здесь, я начал с этого:
private void textBox_KeyDown(object sender, KeyEventArgs keArgs)
{
bool useHTMLCodes = checkBoxUseHTMLCodes.Checked;
String replacement = null;
if (Control.ModifierKeys == Keys.None) return; // doesn't work
if (useHTMLCodes)
{
if (Control.ModifierKeys == Keys.Control && keArgs.KeyCode == Keys.A)
{
replacement = "á";
}
else if (Control.ModifierKeys == Keys.Control && Control.ModifierKeys == Keys.Shift && keArgs.KeyCode == Keys.A)
{
replacement = "Á";
}
}
else // just replace with the raw char, not the fancy-pants HTML code
{
if (Control.ModifierKeys == Keys.Control && keArgs.KeyCode == Keys.A)
{
replacement = "á";
}
else if (Control.ModifierKeys == Keys.Control && Control.ModifierKeys == Keys.Shift && keArgs.KeyCode == Keys.A)
{
replacement = "Á";
}
}
MessageBox.Show(replacementChar);
}
... но это не работает неопрятный носок в отчаянной и острой необходимости штопки. Окно сообщения ничего не показывает (пустой символ); Я пытался выгрузить отдельные ключи, возвращая их, если они не были найдены, но это тоже не работает.
Так как же я могу реагировать на определенные аккорды и вставлять специальный ключ в текстовое поле после перехвата того, что было введено?
ОБНОВИТЬ
Ответ Idle_Mind был великолепен, но все еще есть две неработающие клавиши - "С", который должен быть вызван Ctrl+Shift+N, и "¡", потому что, кажется, нет члена Keys, соответствующего "!" что я могу попытаться сдвинуть.
protected override bool ProcessCmdKey(ref Message msg, Keys keyData)
{
if (this.ActiveControl != null && this.ActiveControl is TextBox)
{
string replacement = "";
TextBox tb = (TextBox)this.ActiveControl;
bool useHTMLCodes = checkBoxUseHTMLCodes.Checked;
// A
if (keyData == (Keys.Control | Keys.A))
{
replacement = useHTMLCodes ? "á" : "á";
}
else if (keyData == (Keys.Control | Keys.Shift | Keys.A))
{
replacement = useHTMLCodes ? "Á" : "Á";
}
// E
if (keyData == (Keys.Control | Keys.E))
{
replacement = useHTMLCodes ? "é" : "é";
}
else if (keyData == (Keys.Control | Keys.Shift | Keys.E))
{
replacement = useHTMLCodes ? "É" : "É";
}
// I
if (keyData == (Keys.Control | Keys.I))
{
replacement = useHTMLCodes ? "í" : "í";
}
else if (keyData == (Keys.Control | Keys.Shift | Keys.I))
{
replacement = useHTMLCodes ? "Í" : "Í";
}
// O
if (keyData == (Keys.Control | Keys.O))
{
replacement = useHTMLCodes ? "ó" : "ó";
}
else if (keyData == (Keys.Control | Keys.Shift | Keys.O))
{
replacement = useHTMLCodes ? "Ó" : "Ó";
}
// U
if (keyData == (Keys.Control | Keys.U))
{
replacement = useHTMLCodes ? "ú" : "ú";
}
else if (keyData == (Keys.Control | Keys.Shift | Keys.U))
{
replacement = useHTMLCodes ? "Ú" : "Ú";
}
// U Umlauts
if (keyData == (Keys.Control | Keys.Alt | Keys.U))
{
replacement = useHTMLCodes ? "ü" : "ü";
}
else if (keyData == (Keys.Control | Keys.Alt | Keys.Shift | Keys.U))
{
replacement = useHTMLCodes ? "Ü" : "Ü";
}
// N
if (keyData == (Keys.Control | Keys.N))
{
replacement = useHTMLCodes ? "ñ" : "ñ";
}
else if (keyData == (Keys.Control | Keys.Shift | Keys.N))
{
replacement = useHTMLCodes ? "Ñ" : "Ñ"; // not working
}
// ?
if (keyData == (Keys.Control | Keys.OemQuestion))
{
replacement = useHTMLCodes ? "¿" : "¿";
}
// !
//if (keyData == (Keys.Control | Keys.)) // what is the exclamation point?
//{
// replacement = useHTMLCodes ? "¡" : "¡";
//}
if (replacement != "")
{
tb.SelectedText = replacement;
return true;
}
}
return base.ProcessCmdKey(ref msg, keyData);
}
Комментарий и закомментированная часть проясняют, что не работает.
1 ответ
Вот один из способов сделать это для всех текстовых полей в вашей форме:
public partial class Form1 : Form
{
public Form1()
{
InitializeComponent();
}
protected override bool ProcessCmdKey(ref Message msg, Keys keyData)
{
if (this.ActiveControl != null && this.ActiveControl is TextBox)
{
string replacement = "";
TextBox tb = (TextBox)this.ActiveControl;
bool useHTMLCodes = checkBoxUseHTMLCodes.Checked;
if (keyData == (Keys.Control | Keys.A))
{
replacement = useHTMLCodes ? "á" : "á";
}
else if (keyData == (Keys.Control | Keys.Shift | Keys.A))
{
replacement = useHTMLCodes ? "Á" : "Á";
}
if (replacement != "")
{
tb.SelectedText = replacement;
return true;
}
}
return base.ProcessCmdKey(ref msg, keyData);
}
}