home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1997 April
/
Chip_1997-04_cd.bin
/
prezent
/
cb
/
data.z
/
MNUBUILD.DFM
/
MNUBUILD.txt
< prev
Wrap
Text File
|
1997-01-16
|
2KB
|
95 lines
object MenuBuilder: TMenuBuilder
Left = 192
Top = 107
Width = 433
Height = 276
Caption = 'Menu Designer'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'System'
Font.Style = []
Icon.Data = {<image000.ico>}
PopupMenu = PopupMenu1
Position = poScreenCenter
OnActivate = FormActivate
OnCreate = FormCreate
OnDestroy = FormDestroy
OnDeactivate = FormDeactivate
OnMouseDown = FormMouseDown
OnResize = FormResize
PixelsPerInch = 96
TextHeight = 16
object PopupMenu1: TPopupMenu
HelpContext = 30100
OnPopup = PopupMenu1Popup
Left = 8
Top = 8
object InsertItem: TMenuItem
Caption = '&Insert'
HelpContext = 2150
ShortCut = 45
OnClick = InsertItemClick
end
object DeleteItem: TMenuItem
Caption = '&Delete'
HelpContext = 2151
ShortCut = 46
OnClick = DeleteItemClick
end
object N1: TMenuItem
Caption = '-'
ShortCut = 0
end
object CreateSubmenu1: TMenuItem
Caption = '&Create Submenu'
HelpContext = 2152
ShortCut = 16423
OnClick = CreateSubmenu1Click
end
object TMenuItem
Caption = '-'
ShortCut = 0
end
object PopupMenu1SelectMenu: TMenuItem
Caption = 'Se&lect Menu...'
HelpContext = 2153
ShortCut = 0
OnClick = PopupMenu1SelectMenuClick
end
object PopupMenu1SaveAsTemplate: TMenuItem
Caption = '&Save As Template...'
HelpContext = 2154
ShortCut = 0
OnClick = PopupMenu1SaveAsTemplateClick
end
object PopupMenu1InsertFromTemplate: TMenuItem
Caption = 'I&nsert From Template...'
HelpContext = 2155
ShortCut = 0
OnClick = PopupMenu1InsertFromTemplateClick
end
object PopupMenu1DeleteTemplates: TMenuItem
Caption = 'D&elete Templates...'
HelpContext = 2156
ShortCut = 0
OnClick = PopupMenu1DeleteTemplatesClick
end
object InsertResourceItem: TMenuItem
Caption = 'Insert From Resource...'
HelpContext = 2157
ShortCut = 0
OnClick = InsertResourceItemClick
end
end
object LoadMenuDlg: TOpenDialog
FileEditStyle = fsEdit
Filter =
'Menu Files (*.mnu)|*.mnu|Resource Files (*.rc)|*.rc|All Files (*' +
'.*) |*.*'
Options = [ofShowHelp, ofPathMustExist, ofFileMustExist]
Title = 'Insert Menu From Resource'
Left = 48
Top = 8
end
end