模拟TAB键

时间：2014-07-29 21:16:02 阅读：377 评论：0 收藏：0 [点我收藏+]

模拟TAB键 (2013/6/7 22:35:29)

SelectNext(ActiveControl,True,True);

屏蔽Alt+F4关闭键 (2013/6/7 22:35:39)

启动某些程序，使用Alt+F4键，可以快速的退出程序，可是如果是做一个屏幕保护程序的话，那么这个方便将成为绊脚石，所以有必要令该功能键失去作用，所以我们使用了窗体的OnKeyDown事件来检测击键：

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;Shift: TShiftState);
begin
    if (ssAlt in shift) and (key=115) then 
        key:=0;
end;

来自为知笔记(Wiz)

模拟TAB键,布布扣,bubuko.com

模拟TAB键

原文：http://www.cnblogs.com/xe2011/p/3876122.html

踩

(0)

评论一句话评论（0）

分享档案

更多>

2021年09月23日 (328)
2021年09月24日 (313)
2021年09月17日 (191)
2021年09月15日 (369)
2021年09月16日 (411)
2021年09月13日 (439)
2021年09月11日 (398)
2021年09月12日 (393)
2021年09月10日 (160)
2021年09月08日 (222)