В компонету VirtualStringTree прицепил контекстное меню. В меню есть пункт "Delete" к которому привязан ShortCut - Del. То есть, это выглядит так - "Delete      Del"
В событии VTKeyDown идет проверка, если нажата кнопка Delete, то вызывается процедура удаления узла компонента. Проблема в том что эта же процедура вызывается при редактировании узла, удалить буквы кнопкой Delete, не удается.

Что я хочу:
1. Если узел редактируется, то кнопкой удаления удаляем буквы из узла.
2. Если узел не редактируется, то он удаляется.
3. И в пункте меню, чтобы мог использовать Del, т.е. "Delete      Del" (в данный момент у меня только так "Delete", иначе проблему не могу решить).

Посоветуйте как сделать, так как надо?

Может примерно так:
При редактировании вывешивается флаг 
Flag := true 
в конце редактирования флаг false;
а при нажатии на пункт меню проверять если флаг = true то удалять буквы else удалять пункт...

если я правильно понял...

Все правильно, но...

в событии VTKeyDown, я уже пробовал сделать вот так:



и не сработало.
А вот если  if not vt.IsEditing then, поместить в процедуру удаления  Deletecategory1Click (так как сейчас у меня), то в этом случае, все нормально. Почему так, я не знаю. Но как только к пункту меню прикручиваю ShortCut "Del", вообще ни удаляет узел, ни букву.

Это сообщение отредактировал(а) Pavelbej - 18.1.2008, 22:43

если ВСЕ нормально, то есть такая мудрость - ;) 
а вообще трасировку используй и смотри 

Мне бы хотелось и это решить