Hola.
Te pongo un ejemplo de como activar/desactivar cada uno de los items que dependen del MenuItem 'Mantenimiento' desde otro form.
Código Delphi
[-]
...
type
TForm2 = class(TForm)
ComboBox1: TComboBox;
procedure FormShow(Sender: TObject);
private
procedure ComboBox1Change(Sender: TObject);
public
end;
...
implementation
uses Unit1;
procedure ItemOnOff(Ix: Integer);
begin
with FPrincipal.MainMenu1 do
Items[0].Items[Ix].Enabled:= not Items[0].Items[Ix].Enabled;
end;
procedure TForm2.ComboBox1Change(Sender: TObject);
begin
ItemOnOff(ComboBox1.ItemIndex);
end;
procedure TForm2.FormShow(Sender: TObject);
begin
with ComboBox1 do
begin
Clear;
Items.Add('Usuarios');
Items.Add('Clientes');
Items.Add('Proveedores');
Items.Add('Usuarios');
ItemIndex:= 0;
OnChange:= ComboBox1Change;
end;
end;
...
Mostra a Form2 con Show así tenés accesibles las dos ventanas al mismo tiempo y verificas los estados.
Un saludo.