易语言系统右键新建某文件

譬如：

右键菜单及关联 (“txt2”)

譬如：

右键菜单及关联 (“mp5”, “mp5文件”, “C:\Windows\notepad.exe”, “C:\Windows\notepad.exe”)

.版本 2

.子程序 右键菜单及关联

.参数 文件后缀, 文本型, , 文件后缀，不包含“.”。

.参数 显示名称, 文本型, 可空, 右键菜单新建的显示名称(空为系统默认或文件后粗档缀名)。

.参数 文件图标, 文本型, 可空, 图标路径或EXE文件路径(空为系统默认或无图标，多刷新几次桌面,有延迟 或 注销后生效)。

.参数 关联程序, 文本型, 可空, 关联应用程序(空为系统默认或无关联程序，如对系统默认后缀修改关联程序需要手动设置默认程序，譬如.MP3,.3gp等等)。

.如果真 (文件后缀 ≠ “”)

写注册项 (#根类, “.” ＋ 文件后缀 ＋ “\”, 文件后缀)

.如果真 (显示名称 ＝ “” 且 取文本注册项 (#根类, 文件后缀 ＋ “\”, ) ＝ “”)

显示名称 ＝ 文件后缀

.如果真结束

.如果真 (显示名称 ≠ “”)

写注册项 (#根类, 文件后缀 ＋ “\”, 显示名称)

.如果真山凳枝结束

.如果真 (文件图标 ≠ “”)

写注册项 (#根类, 取文本注册项 (#根类, “.” ＋ 文件后缀 ＋ “\”, ) ＋逗敏 “\DefaultIcon\”, 文件图标 ＋ “,0”)

.如果真结束

.如果真 (关联程序 ≠ “”)

删除注册项 (#现行用户, “Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts\.” ＋ 文件后缀 ＋ “\OpenWithList”)

删除注册项 (#现行用户, “Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts\.” ＋ 文件后缀 ＋ “\OpenWithProgids”)

删除注册项 (#现行用户, “Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts\.” ＋ 文件后缀 ＋ “\UserChoice”)

写注册项 (#根类, 取文本注册项 (#根类, “.” ＋ 文件后缀 ＋ “\”, ) ＋ “\shell\open\command\”, 关联程序 ＋ “ ” ＋ #引号 ＋ “%1” ＋ #引号)

.如果真结束

写注册项 (#根类, “.” ＋ 文件后缀 ＋ “\ShellNew\NullFile”, “”)

写注册项 (#根类, “.” ＋ 文件后缀 ＋ “\ShellNew\FileName”, “template.” ＋ 文件后缀)

.如果真结束

.子程序 删除右键菜单

.参数 文件后缀, 文本型

.如果真 (文件后缀 ≠ “”)

删除注册项 (#根类, “.” ＋ 文件后缀 ＋ “\ShellNew\NullFile”)

删除注册项 (#根类, “.” ＋ 文件后缀 ＋ “\ShellNew\FileName”)

.如果真结束

先用菜单编辑器，写出你需要的菜单，然后在窗口创建完毕事茄春漏件里，让你的菜单可视=假

比如

.版本 2

.子程序 __启动窗口_创建完毕

程序.可视 ＝ 假

然后在你需要出现右键菜单的组件上，选择右键被按下事件，d出菜单 (程序, , )

比如在列森模表框里，按下右键需要d出菜单，就在列表框的事件里找到，右键被按下，颤烂然后

d出菜单 (程序, , )