文档章节

TMainMenu 类[一]

涂孟超
 涂孟超
发布于 2014/09/26 15:36
字数 225
阅读 9
收藏 0

自动建立一个 SDI Application 程序, 程序包含了漂亮的菜单:



在窗体文件内记录着菜单数据:
object MainMenu1: TMainMenu
  Images = ImageList1
  Left = 8
  Top = 152
  object File1: TMenuItem
    Caption = '&File'
    Hint = 'File related commands'
    object FileNewItem: TMenuItem
      Action = FileNew1
    end
    object FileOpenItem: TMenuItem
      Action = FileOpen1
    end
    object FileSaveItem: TMenuItem
      Action = FileSave1
    end
    object FileSaveAsItem: TMenuItem
      Action = FileSaveAs1
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object FileExitItem: TMenuItem
      Action = FileExit1
    end
  end
  object Edit1: TMenuItem
    Caption = '&Edit'
    Hint = 'Edit commands'
    object CutItem: TMenuItem
      Action = EditCut1
    end
    object CopyItem: TMenuItem
      Action = EditCopy1
    end
    object PasteItem: TMenuItem
      Action = EditPaste1
    end
  end
  object Help1: TMenuItem
    Caption = '&Help'
    Hint = 'Help topics'
    object HelpAboutItem: TMenuItem
      Action = HelpAbout1
    end
  end
end

 
 
 
 
 

 

 

  
菜单是一个 TMainMenu 类型的对象; 每一个菜单项都是一个 TMenuItem 类型的对象. 单元文件中有声明:
MainMenu1     : TMainMenu;

File1         : TMenuItem;
FileNewItem   : TMenuItem;
FileOpenItem  : TMenuItem;
FileSaveItem  : TMenuItem;
FileSaveAsItem: TMenuItem;
N1            : TMenuItem;
FileExitItem  : TMenuItem;
Edit1         : TMenuItem;
CutItem       : TMenuItem;
CopyItem      : TMenuItem;
PasteItem     : TMenuItem;
Help1         : TMenuItem;
HelpAboutItem : TMenuItem;

 
 
 
 
 

 

 

  
看来学习 TMainMenu 类, 必须同时学习 TMenuItem 类; 因为菜单是由若干菜单项(TMenuItem)构成的.

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

共有 人打赏支持
涂孟超
粉丝 12
博文 2011
码字总数 14107
作品 0
深圳
程序员
私信 提问
GO 语言 UI 组件库 - govcl

由于现有第三方的Go UI库不是太大就是用的不习惯,或者组件太少。就萌生了自己写一个UI库的想法Delphi(Lazarus)有些许多优秀的VCL(LCL)组件,不拿来使用太可惜了。所以就索性做了一套。目前支...

不在乎y
2017/10/10
6.9K
17
Delphi源程序格式书写规范

1 ,规范简介 本规范主要规定Delphi 源程序在书写过程中所应遵循的规则及注意事项。编写该规范的目的是使公司软件开发人员的源代码书写习惯保持一致。这样做可以使每一个组员都可以理解其它组...

长平狐
2012/09/03
214
0
Java属性拷贝问题

有三个类,类一(Class1) 类二(Class2)继承类一(Class1) 类三(Class3)也继承至类一(Class1) 然后在逻辑中创建类二(Class2)的实例 问题是用什么样的方法拷贝类二(Class2)的属性到...

引_
2012/10/26
1K
3
详细解析几个和网络请求有关的类

详细解析几个和网络请求有关的类 (一) —— NSURLSession 详细解析几个和网络请求有关的类(二) —— NSURLRequest和NSMutableURLRequest 详细解析几个和网络请求有关的类(三) —— NS...

maskmale
08/18
0
0
两句话轻松掌握 python 最难知识点——元类

千万不要被所谓“元类是99%的python程序员不会用到的特性”这类的说辞吓住。因为每个中国人,都是天生的元类使用者 学懂元类,你只需要知道两句话: 道生一,一生二,二生三,三生万物 我是谁...

马哥教育
2017/11/06
0
0

没有更多内容

加载失败,请刷新页面

加载更多

OSChina 周日乱弹 —— 钱不还,我就当你人不在了

Osc乱弹歌单(2018)请戳(这里) 【今日歌曲】 @莱布妮子 :分享Bigleaf的单曲《小鹿》 《小鹿》- Bigleaf 手机党少年们想听歌,请使劲儿戳(这里) 周日在家做什么? 做手工呀, @poorfis...

小小编辑
10分钟前
2
1
EOS docker开发环境

使用eos docker镜像是部署本地EOS开发环境的最轻松愉快的方法。使用官方提供的eos docker镜像,你可以快速建立一个eos开发环境,可以迅速启动开发节点和钱包服务器、创建账户、编写智能合约....

汇智网教程
今天
15
0
《唐史原来超有趣》的读后感优秀范文3700字

《唐史原来超有趣》的读后感优秀范文3700字: 作者:花若离。我今天分享的内容《唐史原来超有趣》这本书的读后感,我将这本书看了一遍之后就束之高阁了,不过里面的内容一直在在脑海中回放,...

原创小博客
今天
19
0
IC-CAD Methodology知识图谱

CAD (Computer Aided Design),计算机辅助设计,指利用计算机及其图形设备帮助设计人员进行设计工作,这个定义同样可以用来近似描述IC公司CAD工程师这个岗位的工作。 早期IC公司的CAD岗位最初...

李艳青1987
今天
22
0
CompletableFuture get方法一直阻塞或抛出TimeoutException

问题描述 最近刚刚上线的服务突然抛出大量的TimeoutException,查询后发现是使用了CompletableFuture,并且在执行future.get(5, TimeUnit.SECONDS);时抛出了TimeoutException异常,导致接口响...

xiaolyuh
今天
11
0

没有更多内容

加载失败,请刷新页面

加载更多

返回顶部
顶部