Как сделать для кнопки свойство ShortCut Ctrl + "+"

← →
IrviS © (2004-04-02 12:22) [0]

← →
Developerr © (2004-04-02 12:36) [1]

В событии кнопки OnKeyDown пишешь:

if (ssCtrl in Shift)and(Key=VK_ADD) then

← →
Семен Сорокин © (2004-04-02 12:37) [2]

Form.KeyPreview := true;

в обработчике Form.OnKeyDown:

if (Key = VK_ADD) and (Shift = [ssCtrl]) then
Button1.Click

← →
IrviS © (2004-04-02 14:47) [3]

Меня ни так и не понял, моя ошибка,

объясняю, когда я давлю CTRL и плюс,
то что-нибудь происходит

тебе все верно написали! VK_ADD есть виртуальная кнопка "+" на цифровой клаве (справа которая)

> объясняю, когда я давлю CTRL и плюс,
> то что-нибудь происходит

А что имеешь ввиду под Плюс? Если ты имеешь ввиду кнопку на которой нарисованы +/=, то все-равно плюс на этой кнопке вызывается с помощью Shift, в ином случае будет равно.

Как сделать для кнопки свойство ShortCut Ctrl + "+" Найти похожие ветки