Цитата:
Сообщение от Alegun
Тогда и проверять нужно "НАЖАТИЕ" а не "ЗАЖАТИЕ"
Код:
function CtrlDown : Boolean;
var
State : TKeyboardState;
begin
GetKeyboardState(State);
Result := ((State[vk_Control] and 128) <> 0);
end;
|
Именно. На него выше ссылку и дал. Всем спасибо.