文档章节

TMainMenu 类[一]

涂孟超
 涂孟超
发布于 2014/09/26 15:36
字数 225
阅读 9
收藏 0
点赞 0
评论 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
博文 2004
码字总数 14107
作品 0
深圳
程序员
GO 语言 UI 组件库 - govcl

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

不在乎y ⋅ 2017/10/10 ⋅ 17

Delphi源程序格式书写规范

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

长平狐 ⋅ 2012/09/03 ⋅ 0

Java属性拷贝问题

有三个类,类一(Class1) public class Class1 {private String name;private int age;public String getName() {return name;}public void setName(String name) {this.name = name;}publi......

Asgic ⋅ 2012/10/26 ⋅ 3

两句话轻松掌握 python 最难知识点——元类

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

马哥教育 ⋅ 2017/11/06 ⋅ 0

中文文稿层次序号使用规范

一、区分两种体例的层次序号 根据国家标准等相关规定,中文文稿的层次序号有两种体例: (1)科技类文稿的层次一律用阿拉伯数字连续编号,不同层次的数字之间加下圆点相隔(即圆点加在数字的...

青木河 ⋅ 2015/01/28 ⋅ 0

设计模式(三)——自动加载

php提供了两种方案来自动载入:autoload()函数和spl系列函数 一、前提约束 1.类文件命名方式采用驼峰写法,且以.class.php做后缀,比如: Page.class.php 2.一个类文件中只写一个类,且这个类的...

宁少爷 ⋅ 2016/04/26 ⋅ 0

Java反射及依赖注入简单模拟

一、编写Dao类 package cn.com.songjy.annotation; import java.util.Date; public class MyDao { public String time(){return "你好,现在的时间是:" + new Date();} } 二、编写属性文件【......

冰玉翔龙 ⋅ 2013/06/29 ⋅ 2

Java语言中的----继承(一)

day10 Java语言中的继承(一) 一、继承概述: 继承:什么是继承,程序中的继承与生活中的继承还是有区别的,在程序中继承以后,你的父类和你的子类同样的也具有某一成员变量。那么我们为什么...

孤独一夜 ⋅ 2017/09/27 ⋅ 0

【P000-011】重构交易费计算系统

主界面基本功能都已实现,现在要添加转债页面及相关功能,原有的一些问题也暴露了出来,大约有两个,一个是界面类中控制操作其他类的代码太多,理论上界面类应该只负责操作页面和传递数据给控...

一体同悲 ⋅ 2014/06/12 ⋅ 0

Hibernater学习笔记(六)

一、对象导航查询 之前的客户和联系人的关系是一 对多的关系:一对多 场景:根据客户id查询客户,在查出该客户的所有联系人 二、HQL查询 查询所有客户信息 创建Query对象,写出hql语句 调用q...

Mr_欢先生 ⋅ 01/02 ⋅ 0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

用ZBLOG2.3博客写读书笔记网站能创造今日头条的辉煌吗?

最近两年,著名的自媒体网站今日头条可以说是火得一塌糊涂,虽然从目前来看也遇到了一点瓶颈,毕竟发展到了一定的规模,继续增长就更加难了,但如今的今日头条规模和流量已经非常大了。 我们...

原创小博客 ⋅ 今天 ⋅ 0

MyBatis四大核心概念

本文讲解 MyBatis 四大核心概念(SqlSessionFactoryBuilder、SqlSessionFactory、SqlSession、Mapper)。 MyBatis 作为互联网数据库映射工具界的“上古神器”,训有四大“神兽”,谓之:Sql...

waylau ⋅ 今天 ⋅ 0

以太坊java开发包web3j简介

web3j(org.web3j)是Java版本的以太坊JSON RPC接口协议封装实现,如果需要将你的Java应用或安卓应用接入以太坊,或者希望用java开发一个钱包应用,那么用web3j就对了。 web3j的功能相当完整...

汇智网教程 ⋅ 今天 ⋅ 0

2个线程交替打印100以内的数字

重点提示: 线程的本质上只是一个壳子,真正的逻辑其实在“竞态条件”中。 举个例子,比如本题中的打印,那么在竞态条件中,我只需要一个方法即可; 假如我的需求是2个线程,一个+1,一个-1,...

Germmy ⋅ 今天 ⋅ 0

Springboot2 之 Spring Data Redis 实现消息队列——发布/订阅模式

一般来说,消息队列有两种场景,一种是发布者订阅者模式,一种是生产者消费者模式,这里利用redis消息“发布/订阅”来简单实现订阅者模式。 实现之前先过过 redis 发布订阅的一些基础概念和操...

Simonton ⋅ 今天 ⋅ 0

error:Could not find gradle

一.更新Android Studio后打开Project,报如下错误: Error: Could not find com.android.tools.build:gradle:2.2.1. Searched in the following locations: file:/D:/software/android/andro......

Yao--靠自己 ⋅ 昨天 ⋅ 0

Spring boot 项目打包及引入本地jar包

Spring Boot 项目打包以及引入本地Jar包 [TOC] 上篇文章提到 Maven 项目添加本地jar包的三种方式 ,本篇文章记录下在实际项目中的应用。 spring boot 打包方式 我们知道,传统应用可以将程序...

Os_yxguang ⋅ 昨天 ⋅ 0

常见数据结构(二)-树(二叉树,红黑树,B树)

本文介绍数据结构中几种常见的树:二分查找树,2-3树,红黑树,B树 写在前面 本文所有图片均截图自coursera上普林斯顿的课程《Algorithms, Part I》中的Slides 相关命题的证明可参考《算法(第...

浮躁的码农 ⋅ 昨天 ⋅ 0

android -------- 混淆打包报错 (warning - InnerClass ...)

最近做Android混淆打包遇到一些问题,Android Sdutio 3.1 版本打包的 错误如下: Android studio warning - InnerClass annotations are missing corresponding EnclosingMember annotation......

切切歆语 ⋅ 昨天 ⋅ 0

eclipse酷炫大法之设置主题、皮肤

eclipse酷炫大法 目前两款不错的eclipse 1.系统设置 Window->Preferences->General->Appearance 2.Eclipse Marketplace下载【推荐】 Help->Eclipse Marketplace->搜索‘theme’进行安装 比如......

anlve ⋅ 昨天 ⋅ 0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

返回顶部
顶部