请问ctrl键的键值是多少??实在是穷,没分了,大家还是帮个忙吧(0分)

  • 主题发起人 主题发起人 cf0129
  • 开始时间 开始时间
C

cf0129

Unregistered / Unconfirmed
GUEST, unregistred user!
请问ctrl键的键值是多少??实在是穷,没分了,大家还是帮个忙吧
 
procedure TForm1.Edit1KeyUp(Sender: TObject;
var Key: Word;
Shift: TShiftState);
begin

Edit2.Clear;

Edit2.Text := '十进制:' + IntToStr(Key);
end;
运行后将光标放入Edit1中,按键盘后Edit2中会显示键值
 
请教:
如何响应当控件为dbgrid时按下ctrl,dbgrid的dgmultiselect为true;
 
直接用VK_CONTROL就行了,如果真想知道键值,
可找到在delphi中键入VK_CONTROL后按下ctrl键,再
点鼠标,就可知道。
 
后退
顶部