黑白程式

黑白程式

导航

2008年9月2日

Case和if使用节选代码（摘自Delphi安装目录代码）

摘要： procedure TSpinButton.KeyDown(var Key: Word; Shift: TShiftState); begin case Key of VK_UP: begin SetFocusBtn (FUpButton); FUpButton.Click; end; VK_DOWN: beg... 阅读全文

posted @ 2008-09-02 10:53 黑白程式 阅读(343) 评论(0) 推荐(0)

虚拟键码对照表（参考）

摘要： 虚拟键码对照表 虚拟键码 对应值 对应键 VK_LBUTTON 1 鼠标左键 VK_RBUTTON 2 ... 阅读全文

posted @ 2008-09-02 10:34 黑白程式 阅读(3684) 评论(0) 推荐(0)