Действие при зажатой клавише

← →
dest81 (2008-08-11 10:37) [0]

Здравствуйте!
Нужно отследить зажата ли клавиша! Например: элемент перемещается перетягиванием с одного окна во второе, а при зажатой клавише ctrl - копируется!

← →
Ega23 © (2008-08-11 10:41) [1]

function TCustomDBTreeView.IsCtrlKeyPressed: Boolean; begin Result := ((GetKeyState(VK_LCONTROL) and $8000) = $8000) or ((GetKeyState(VK_RCONTROL) and $8000) = $8000); end;

← →
dest81 (2008-08-11 11:44) [2]

Спасибо! Работает!

Действие при зажатой клавише Найти похожие ветки