Ver Mensaje Individual
  #2  
Antiguo 14-09-2019
Avatar de escafandra
[escafandra] escafandra is offline
Miembro Premium
 
Registrado: nov 2007
Posts: 2.197
Reputación: 20
escafandra Tiene un aura espectacularescafandra Tiene un aura espectacular
Para añadir Items al menú puedes hacer algo como esto:


Código Delphi [-]
var
  Item: TMenuItem;
begin
  Form2.Show;
  Item:= TMenuItem.Create(MainMenu1);
  Item.Caption:= 'Opcion1';
  Ventanas.Insert(Ventanas.Count, Item);
end;


Saludos.
Responder Con Cita