1object TestMenuIntfDlg: TTestMenuIntfDlg
2  Left = 287
3  Height = 237
4  Top = 215
5  Width = 541
6  Caption = 'TestMenuIntfDlg'
7  Menu = TestMainMenuIntf1
8  LCLVersion = '1.7'
9  object TestMainMenuIntf1: TMainMenu
10    left = 64
11    top = 16
12  end
13  object TestPopupMenuIntf1: TPopupMenu
14    left = 64
15    top = 80
16  end
17end
18