• 主页
  • 招聘
  • 语言基础/算法/系统设计
  • 数据库相关
  • 图形处理/多媒体
  • 网络通信/分布式开发
  • VCL组件开发及应用
  • Windows SDK/API

Windows下计算器中使用键盘输入时,屏幕上按键效果如何实现?

Icebird 四川大学 2000-10-16 03:16:00
如何用Delphi实现?
...全文
101 点赞 收藏 2
写回复
2 条回复
Lionheart 2000年10月19日
var
i: integer;
begin
i:=0;
speedbutton1.down:=true;
while i<10000 do
begin
inc(i);
application.processmessages;
end;
speedbutton1.down:=false;
end;

speedbutton的GROUPINDEX设为非0,ALLOWALLUP设为TRUE,FORM的KeyPreview设为TRUE。对KeyPress编码。
回复 点赞
Icebird 2000年10月19日
效果不错,不过似乎循环太大了, 5000次足亦
回复 点赞
发动态
发帖子
Delphi
创建于2007-08-02

1463

社区成员

26.2w+

社区内容

Delphi 开发及应用
社区公告
暂无公告