delphi动态获取点击的MenuItem

最新推荐文章于 2020-03-20 14:42:47 发布
最新推荐文章于 2020-03-20 14:42:47 发布
阅读量927 收藏
点赞数
分类专栏： 自己看的 文章标签： delphi
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/shenbin6830/article/details/77983790
版权

procedure TForm1.OnClick(Sender: TObject);
begin
if Sender is TButton then
begin
if TButton(Sender).Name = ‘button1’ then
.. .
else if TButton(Sender).Name = ‘button2’ then
.. .
end;
end;

热心网友徐某某
关注
  • 0
    点赞
  • 踩
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
专栏目录
Mainmenu控件的使用方法详解
08-18
Mainmenu控件的使用方法详解，比较全面的解释
delphi 动态创建菜单实例
12-26
在Delphi编程中，动态创建菜单是一项非常实用的技术，它允许开发者在运行时根据需要创建、修改或删除菜单项，增强了程序的灵活性和用户交互性。以下是对"delphi 动态创建菜单实例"的详细解释： 首先，我们来看动态...
delphi 遍历菜单
qq457565758的博客
05-04 863
遍历主菜单及子菜单： 运行结果如下 代码如下 procedure TForm1.Button1Click(Sender: TObject); var i,k:integer; begin memo1.Lines .clear; for i:=0 to mainmenu1.items.count-1 do begin memo1...
Delphi在系统菜单中添加菜单项
weixin_30271335的博客
05-16 193
unit dy219; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = class(TForm) 　　procedure FormCreate(Sender: TObject); priva...
DELPHI的奇异菜单的编写
e271828的专栏
12-30 1493
                                  DELPHI的奇异菜单的编写                       翻译者:  李均宇      email:   e271828@163.net,okMyDelphi@163.net Custom Menus, Text, Lines / Delphi 4, 5自定义菜单,文本,线/ Delphi 4, 5Fa
用SetMenuInfo 为菜单添加更多特性
lbird
11-03 9303
用SetMenuInfo 为菜单添加更多特性FAQ1：如何改变菜单的背景颜色 FAQ2：当鼠标离开菜单时，如何让菜单自动关闭 FAQ3：如何让菜单支持拖拽 FAQ4：如何设置菜单的最大高度（一但菜单超过这个高度时将自动出现滚动栏）   相关的消息: WM_MENUDRAG 当用户拖拽
Menu控件绑定数据库数据代码
weixin_30262255的博客
08-27 242
因为SqlDataSource控件还是ObjectDatasource控件都没有实现IHierarchicalDataSource接口，所以Menu控件表现数据库数据，有两种方法: 一、创建自己的SqlHierachicalDataSource控件。就是继承IHierarchicalDataSource基类。 二、通过编程的方法为Menu控件创建菜单项目。 ...
Android MenuItem 自定义长按事件的实现
08-27
1. **获取MenuItem的View**： 在Android中，MenuItem本身并不直接对应一个View，但它可以通过`inflate`方法填充到菜单中，然后我们可以获取到对应的View对象。通常，我们可以在`onCreateOptionsMenu`方法中完成这...
Delphi菜单组件TMainMenu使用方法详解
08-28
Delphi 菜单组件 TMainMenu 使用方法详解 Delphi 菜单组件 TMainMenu 是 Delphi 编程语言中一个非常重要的组件，它允许开发者在应用程序中创建菜单，实现菜单的各种操作。下面将详细介绍 TMainMenu 的使用方法，...
delphiTrees_delphi_Delphi读取CFG_
09-30
此函数将读取文件的每一行，查找配置项，如`[MenuItem]`，并提取其相关的属性，如`ID`和`ParentID`。`ID`对应菜单项的标识，而`ParentID`指明该菜单项的父节点是谁。 在解析过程中，我们可以使用一个字典（例如...
Delphi Edit右键系统菜单加自定义菜单项
10-18
Delphi Edit右键系统菜单加自定义菜单项，注意是添加，不是用新菜单替换系统菜单！
WPF中MenuItem原生样式
07-22
WPF中MenuItem原生样式
Delphi中关于菜单的几个技巧
dkopg24406的专栏
09-02 413
-- 1将菜单项移到菜单栏的最右边 　　在一些应用程序中，常把一些特殊的菜单项放在菜单栏的最右边（如WPS2000 中的"定制界面"菜单，一些应用程序的帮助菜单），这些菜单项放在菜单栏 （menu bar）的右边比较好。Delphi中虽然没有直接提供（呵呵，也许是我没找 到）把菜单放在菜单栏右边的函数，但是Delphi的Windows单元封装了可以实现这 种效果的Windows...
Delphi制作带图标的弹出式选单 - DELPHI
weixin_30396699的博客
01-02 69
Delphi制作带图标的弹出式选单 - DELPHI Windows界面的一大特色就是显示丰富多彩的图标，图标不仅美化了Windows的桌面，而且便于直观的操作，给用户带来了极大的方便。在设计程序界面时，Windows风格是很好的参考。 　　Delphi一般提供两种设置图标的方法，一个是在Project Options 中指定应用程序的图标，另一个是在Ob...
ContextMenu和ContextMenuItem
u014589770的博客
03-20 1617
ContextMenu ContextMenu和[MenuItem(“CONTEXT/xxx/xxx”)]实现的效果一样，都是给组件的右键菜单添加菜单项。不同的是MenuItem位于UnityEditor中，ContextMenu位于UnityEngine中，所以ContextMenu可以用在继承自MonoBehaviour的脚本中。 若为自定义的脚本添加右键菜单项可使用ContextMenu和M...
java点击menuitem打开另一个类
最新发布
06-11
要实现在Java中点击MenuItem打开另一个类的窗口，可以按照以下步骤进行： 1. 创建一个MenuItem对象，并添加到Menu中： ``` MenuItem menuItem = new MenuItem("Open Another Window"); Menu menu = new Menu("File"); menu.getItems().add(menuItem); ``` 2. 给MenuItem添加事件监听器，当MenuItem被点击时，创建另一个类的实例并显示： ``` menuItem.setOnAction(event -> { AnotherWindow anotherWindow = new AnotherWindow(); anotherWindow.show(); }); ``` 3. 创建另一个类，继承自Stage，并实现其构造方法和需要的界面元素： ``` import javafx.scene.Scene; import javafx.scene.control.Label; import javafx.scene.layout.VBox; import javafx.stage.Stage; public class AnotherWindow extends Stage { public AnotherWindow() { VBox root = new VBox(); root.getChildren().add(new Label("This is another window!")); Scene scene = new Scene(root, 400, 300); setScene(scene); } } ``` 完整代码示例： ``` import javafx.application.Application; import javafx.scene.Scene; import javafx.scene.control.Menu; import javafx.scene.control.MenuBar; import javafx.scene.control.MenuItem; import javafx.scene.layout.VBox; import javafx.stage.Stage; public class Main extends Application { @Override public void start(Stage primaryStage) throws Exception{ MenuItem menuItem = new MenuItem("Open Another Window"); menuItem.setOnAction(event -> { AnotherWindow anotherWindow = new AnotherWindow(); anotherWindow.show(); }); Menu menu = new Menu("File"); menu.getItems().add(menuItem); MenuBar menuBar = new MenuBar(); menuBar.getMenus().add(menu); VBox root = new VBox(); root.getChildren().add(menuBar); Scene scene = new Scene(root, 800, 600); primaryStage.setScene(scene); primaryStage.show(); } public static void main(String[] args) { launch(args); } } class AnotherWindow extends Stage { public AnotherWindow() { VBox root = new VBox(); root.getChildren().add(new Label("This is another window!")); Scene scene = new Scene(root, 400, 300); setScene(scene); } } ``` 运行程序，点击菜单栏中的“File” -> “Open Another Window”即可打开另一个类的窗口。
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值