Add(MainForm,6678,182,147)
{
 Left=312
 Top=322
 Width=478
 Height=183
 Caption="Demo"
 Position=1
}
Add(Case,3272618,238,203)
{
 Value=String(About)
 link(onTrue,2656826:doMessage,[])
}
Add(Message,2656826,287,210)
{
 Message="Demo about message"
 Caption="About"
}
Add(MenuEx,10779907,182,196)
{
 EndItemRight=0
 Menu=#4:File|1:(|4:Open|5:Close|1:-|4:Exit|1:)|4:Edit|1:(|4:Copy|5:Paste|1:)|4:Help|1:(|4:Help|5:About|1:)|
 adWidth=40
 FlatSelect=1
 Bitmaps=[]
 Point(MenuItemName)
 link(MenuItemName,3272618:doCase,[])
}