fmenu.form

Gambas is a graphical development environment based on a Basic interpreter, like Visual Basic. It us

# Gambas Form File 1.0

{ FMenu Form
  Move(214,152,496,531)
  Text = ("Menu editor")
  Icon = Picture["img/16/menu.png"]
  Border = Window.Fixed
  { Label4 Label
    Move(16,304,400,24)
    Text = ("Click on Insert to add a new menu.")
  }
  { frmMenu Panel
    Move(8,296,480,184)
    { Label1 Label
      Move(0,0,72,24)
      Text = ("Name")
    }
    { txtName TextBox
      Move(80,0,296,24)
      Text = ("")
    }
    { Label6 Label
      Move(0,32,72,24)
      Text = ("Group")
    }
    { txtGroup TextBox
      Move(80,32,296,24)
      Text = ("")
    }
    { Label2 Label
      Move(0,64,72,24)
      Text = ("Caption")
    }
    { txtCaption TextBox
      Move(80,64,296,24)
      Text = ("")
    }
    { Label3 Label
      Move(0,128,72,24)
      Text = ("Shortcut")
    }
    { chkCtrl CheckBox
      Move(80,128,56,24)
      Text = ("CTRL")
    }
    { chkShift CheckBox
      Move(152,128,64,24)
      Text = ("SHIFT")
    }
    { chkAlt CheckBox
      Move(224,128,48,24)
      Text = ("ALT")
    }
    { cmbShortcut ComboBox
      Move(280,128,96,24)
      Text = ("")
      ReadOnly = True
    }
    { Label5 Label
      Move(0,160,72,24)
      Text = ("Picture")
    }
    { txtPicture TextBox
      Move(80,160,232,24)
      Text = ("")
      ReadOnly = True
    }
    { btnKillPicture Button
      Move(320,160,24,24)
      Text = ("")
      Picture = Picture["img/16/delete.png"]
    }
    { btnPicture Button
      Move(352,160,24,24)
      Text = ("")
      Picture = Picture["img/16/open-file.png"]
    }
    { chkVisible CheckBox
      Move(392,0,88,24)
      Text = ("Visible")
    }
    { chkEnabled CheckBox
      Move(392,24,80,24)
      Text = ("Enabled")
    }
    { chkChecked CheckBox
      Move(392,48,80,24)
      Text = ("Checked")
    }
    { imgPicture PictureBox
      Move(416,136,40,40)
      Alignment = Align.Center
      Border = Border.Sunken
    }
    { Label7 Label
      Move(0,96,72,24)
      Text = ("Tag")
    }
    { txtTag TextBox
      Move(80,96,296,24)
      Text = ("")
    }
  }
  { lstMenu ListBox
    Move(8,8,480,240)
    Mode = ListBox.Extended
  }
  { btnNext Button
    Move(8,256,96,24)
    Text = ("&Next")
  }
  { btnInsert Button
    Move(112,256,96,24)
    Text = ("&Insert")
  }
  { btnDelete Button
    Move(216,256,96,24)
    Text = ("&Delete")
  }
  { btnUp Button
    Move(368,256,24,24)
    Text = ("")
    Picture = Picture["img/16/up.png"]
  }
  { btnDown Button
    Move(400,256,24,24)
    Text = ("")
    Picture = Picture["img/16/down.png"]
  }
  { btnLeft Button
    Move(432,256,24,24)
    Text = ("")
    Picture = Picture["img/16/left.png"]
  }
  { btnRight Button
    Move(464,256,24,24)
    Text = ("")
    Picture = Picture["img/16/right.png"]
  }
  { btnOK Button
    Move(272,496,104,24)
    Text = ("OK")
    Default = True
  }
  { btnCancel Button
    Move(384,496,104,24)
    Text = ("Cancel")
    Cancel = True
  }
}