Delphi7通过插入菜单项显示历史记录信息
1、 启动Delphi7开发环境，进入默认工程的Form1窗体界面。添加一个MainMenu1控件，创建一个标题为文件的主菜单项，并在其下添加两个子菜单项，分别命名为打开和退出，完成菜单结构的布局与设置。
2、 在Form1窗体中添加Opendiag控件，位于dialog组件面板内。
3、 定义一个事件处理函数，用于响应菜单历史记录的点击操作。
4、 在文件菜单中选择打开子项，进入其点击事件方法，并添加如下代码。
5、 var
6、 重新表述如下：
7、 创建历史信息菜单项，显示文件名作为标题，绑定自定义点击事件，并将其插入到打开菜单项的后面。
8、 按下F9运行程序后，选择文件菜单中的打开选项，将弹出文件选择对话框。选定文件并关闭对话框后，再次点击文件菜单，会发现新增了一个子菜单项，其名称显示为所选文件的路径与文件名。单击该子菜单项，系统将弹出一个对话框，显示该文件的具体路径信息。
9、 关闭程序并返回开发界面，选择文件菜单中的退出项，在其点击事件中添加相应代码即可。
10、 终止应用程序运行，关闭当前程序进程。
11、 按F9运行程序，选择文件菜单中的退出项，程序即可正常关闭。
