delphi写程序的快捷键
我想让程序运行后按CTRL+B就触发一个事件,或者为某一个按钮设置快捷键,应该怎么写代码呢?我菜鸟啊,昨天看的delphi,如果用词不准确,大家见谅...
我想让程序运行后按CTRL+B就触发一个事件,或者为某一个按钮设置快捷键,应该怎么写代码呢? 我菜鸟啊,昨天看的delphi,如果用词不准确,大家见谅
展开
2个回答
展开全部
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
// ShowMessage(IntToStr(Key));
if (ssCtrl in Shift) and (Key = 66) then
begin
ShowMessage('你按下了Ctrl + B ');
end;
end;把Form的KeyPreView属性改为True 。
Shift: TShiftState);
begin
// ShowMessage(IntToStr(Key));
if (ssCtrl in Shift) and (Key = 66) then
begin
ShowMessage('你按下了Ctrl + B ');
end;
end;把Form的KeyPreView属性改为True 。
本回答由网友推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
AiPPT
2024-09-19 广告
随着AI技术的飞速发展，如今市面上涌现了许多实用易操作的AI生成工具1、简介：AiPPT: 这款AI工具智能理解用户输入的主题，提供“AI智能生成”和“导入本地大纲”的选项，生成的PPT内容丰富多样，可自由编辑和添加元素，图表类型包括柱状图...
点击进入详情页
本回答由AiPPT提供
展开全部
在对按钮的caption属性设置的时候名称后加上(&B)在运行就可以了，显示的时候会是（B）【B是有下划线的】
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
