Создание ShortCut'a Ctrl++

[roperd]

Подскажите пожалуйста, как создать ShortCut Ctrl++, при обычной вставке выводиться ошибка "Invalid property value"...

[HyperZen]

Сообщение от roperd

Подскажите пожалуйста, как создать ShortCut Ctrl++, при обычной вставке выводиться ошибка "Invalid property value"...

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if ((ssCtrl in Shift) and (chr(Key) in ['+'])) then
    begin
      траляля
    end;

[roperd]

Сообщение от HyperZen

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if ((ssCtrl in Shift) and (chr(Key) in ['+'])) then
    begin
      траляля
    end;

Спасибо работает, только вот как это прописать в самом ShortCut,чтобы справа от Caption отображалось Ctrl++?

[HyperZen]

Сообщение от roperd

Спасибо работает, только вот как это прописать в самом ShortCut,чтобы справа от Caption отображалось Ctrl++?

Пропиши самостоятельно... По-другому, думаю, не получится...