文档章节

TMainMenu 类[三] - 手动建立菜单(7) : 指定快捷键

涂孟超
 涂孟超
发布于 2014/09/26 15:35
字数 153
阅读 5
收藏 0
点赞 0
评论 0

菜单项通过 ShortCut 属性来设定快捷键, ShortCut 是 TShortcut 类型的; TShortcut 是一个子界: 0..65535
ShortCut 的所有可选值请参加列表: http://www.cnblogs.com/del/archive/2008/02/04/1064631.html
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Menus;

type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

var
  MyMenu: TMainMenu;
  Item: TMenuItem;

procedure TForm1.FormCreate(Sender: TObject);
var
  Itemd: TMenuItem;
begin
  MyMenu := TMainMenu.Create(Self);
  MyMenu.AutoHotkeys := maManual;     
  Self.Menu := MyMenu;

  Item := TMenuItem.Create(MyMenu);
  Item.Caption := 'AA';               
  MyMenu.Items.Add(Item);

    Itemd := TMenuItem.Create(MyMenu);
    Itemd.Caption := 'A1';
    Itemd.ShortCut := 16449; {这一句话就为菜单项 A1 指定了快捷键: Ctrl+A }
    Item.Add(Itemd);
end;

end.

 
 
 
 
 

 

 

  
效果图:


本文转载自:http://www.cnblogs.com/del/archive/2008/02/04/1064629.html

共有 人打赏支持
涂孟超
粉丝 12
博文 2011
码字总数 14107
作品 0
深圳
程序员
开发工具总结(6)之被大多人忽略的AS的模板配置4种方式(使用详解)

【前言】2017年最后一天了,首先祝贺大家元旦快乐,2018工作顺利,天天开心。 Android Studio模板相信大家应该多少都有接触过吧,如果用的少也没关系,花30分钟看看这篇博客就会用了,我会带...

AWeiLoveAndroid
2017/12/31
0
0
​WinHotKey 工具使用笔记

一、WinHotKey 简介 WinHotKey 是一个管理 Windows 系统热键的工具。支持自定义新的热键,功能虽没有 AutoHotKey 工具强大,但易学易用。WinHotKey 的下载地址: http://www.softpedia.com/g...

北风其凉
2016/04/23
186
0
Sublime 从本地上传文件或是目录到服务器

问题描述: 最近在使用ST3进行代码编写,之前用的是Atom或是vscode,并没有一个十分中意的代码编辑器,主要还是看使用的心情吧,有的时候使用不同的编辑器。由于部分的代码是在本地机器(Mac...

北静王
06/25
0
0
Total Commander入门

TC(Total Commander)新手入门FAQ(转CCF k12345) 用TC也有些日子了,对新手来说上手确实比较麻烦,最近仔细扫了一遍隔壁和这里的所有TC帖子,发现很多问题重复,一些有价值的讨论散落各处,...

Jian-Yong
2011/11/15
0
0
sublime学习(二)档案导览与指令面板

(一)传送门 Goto Anything就像传送门,让你快速的开启任何档案。使用快捷键 ctrl+p 可以立即打开,当输入文字是立即搜寻、链接到相似档案名的档案并且及时预览.以下是各种快捷键: #: 在档...

VML
2014/04/15
0
0
如何在ChemDraw中绘制透视图形

ChemDraw虽然是一款常用的化学图形绘制软件,但是很多的用户对其使用还是了解的不多,因此,我们希望通过做一些教程来给大家做个参照。本教程将如何用ChemDraw软件绘制霍沃思(Haworth)D-葡...

学术研究软件
2016/04/13
82
0
sublime text2小技巧

1. 文件快速导航: 这是sublime上面很好用的功能之一,ctrl+p可以调出窗口,菜单上的解释是gotoanythings ,确实如其所言,调出窗口后,直接输入关键字,可以在已打开的项目文件夹中进行快速...

文艺小青年
2017/06/29
0
0
正则表达式测试工具 Regex Tester 的使用方法

正则表达式测试工具“RegexTester”,下载地址:http://www.oschina.net/p/regex+tester 一、关于本文 今天的工作中遇到了一些正则表达式,我需要检验它们是否正确,不过我对自己目测的结果又...

北风其凉
2015/07/28
0
0
Adobe Brackets 修改快捷键

Adobe Brackets 修改快捷键 入海数沙2017-12-022 阅读 修改adobe快捷键 点开 Brackets 菜单 “调试”>“打开用户键映射”(Debug > Open User Key Map) 如果没有这个菜单,就自己建立一个配...

入海数沙
2017/12/02
0
0
Spring Richclient — 企业级富客户端开发框架介绍

简介: Spring Richclient 是一个基于 Spring 的企业级富客户端开发框架,使用该框架,可以轻易构建出具有良好可维护性和可扩展性的企业级 Swing 应用,本文是该系列文章的第 1 部分,主要介...

红薯
2010/12/20
2.8K
5

没有更多内容

加载失败,请刷新页面

加载更多

下一页

实现异步有哪些方法

有哪些方法可以实现异步呢? 方式一:java 线程池 示例: @Test public final void test_ThreadPool() throws InterruptedException { ScheduledThreadPoolExecutor scheduledThre......

黄威
今天
0
0
linux服务器修改mtu值优化cpu

一、jumbo frames 相关 1、什么是jumbo frames Jumbo frames 是指比标准Ethernet Frames长的frame,即比1518/1522 bit大的frames,Jumbo frame的大小是每个设备厂商规定的,不属于IEEE标准;...

六库科技
今天
0
0
牛客网刷题

1. 二维数组中的查找(难度:易) 题目描述 在一个二维数组中(每个一维数组的长度相同),每一行都按照从左到右递增的顺序排序,每一列都按照从上到下递增的顺序排序。请完成一个函数,输入...

大不了敲一辈子代码
今天
0
0
linux系统的任务计划、服务管理

linux任务计划cron 在linux下,有时候要在我们不在的时候执行一项命令,或启动一个脚本,可以使用任务计划cron功能。 任务计划要用crontab命令完成 选项: -u 指定某个用户,不加-u表示当前用...

黄昏残影
昨天
0
0
设计模式:单例模式

单例模式的定义是确保某个类在任何情况下都只有一个实例,并且需要提供一个全局的访问点供调用者访问该实例的一种模式。 实现以上模式基于以下必须遵守的两点: 1.构造方法私有化 2.提供一个...

人觉非常君
昨天
0
0
《Linux Perf Master》Edition 0.4 发布

在线阅读:https://riboseyim.gitbook.io/perf 在线阅读:https://www.gitbook.com/book/riboseyim/linux-perf-master/details 百度网盘【pdf、mobi、ePub】:https://pan.baidu.com/s/1C20T......

RiboseYim
昨天
1
0
conda 换源

https://mirrors.tuna.tsinghua.edu.cn/help/anaconda/ conda config --add channels https://mirrors.tuna.tsinghua.edu.cn/anaconda/pkgs/free/conda config --add channels https://mir......

阿豪boy
昨天
1
0
Confluence 6 安装补丁类文件

Atlassian 支持或者 Atlassian 缺陷修复小组可能针对有一些关键问题会提供补丁来解决这些问题,但是这些问题还没有放到下一个更新版本中。这些问题将会使用 Class 类文件同时在官方 Jira bug...

honeymose
昨天
0
0
非常实用的IDEA插件之总结

1、Alibaba Java Coding Guidelines 经过247天的持续研发,阿里巴巴于10月14日在杭州云栖大会上,正式发布众所期待的《阿里巴巴Java开发规约》扫描插件!该插件由阿里巴巴P3C项目组研发。P3C...

Gibbons
昨天
1
0
Tomcat介绍,安装jdk,安装tomcat,配置Tomcat监听80端口

Tomcat介绍 Tomcat是Apache软件基金会(Apache Software Foundation)的Jakarta项目中的一个核心项目,由Apache、Sun和其他一些公司及个人共同开发而成。 java程序写的网站用tomcat+jdk来运行...

TaoXu
昨天
0
0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

返回顶部
顶部