如何判断是否按下了Ctrl+V键？

Question

按下Ctrl键我知道，那么V键呢？if key=VK_CONTROL+chr(86) then

Answer 1

procedure TForm1.Button1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
    if (Shift=[ssCtrl]) and (key=86) then
    showmessage('ctrl+v');
end;

Answer 2

procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if (key=86) and (ssCtrl in Shift) and not (ssShift in Shift) and not(ssAlt in shift) then
  edit2.Text := 'Ctrl+V';
end;

Answer 3

'Ctrl+V' 是系统预先定义的热键。如果不是在文本编辑控件上判断，同意： zhouhaijun(双手冠军剑士) 的