Iniciar sesiónCerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta
LWP » Foros » ADA » manual GTKada

ADA - manual GTKada

Volver
Nuevo Tema
<<>>
 
Vista:

manual GTKada

Publicado por VaMPiR (1 intervención) el 27/01/2009 21:50:15
bueno, llevo varias semanas buscando un manual de GTKada y no encontre nada, mas que el guide user que explica poca cosa (me sirvio para las señales y los eventos) y el reference manual...

el caso es que quiero hacer un programa con gtk y ada, y no encuentro informacion...lo que mas me esta costando son los menus...

si alguien sabe de manuales y/o como se hacen los menus y los menu_bar que me haga un pequeño ejemplo, con una ventana y un menu_bar con menus dentro...(que meter los menus no lo consigo ni a la de tres)

muchas gracias por la posible ayuda
Un saludo
VaMPiR

PD: si no hay menu y me ofreceis ayuda, estoy escribiendo un pequeño tuto conforme voy aprendiendo..almenos sacar algo wweno para la comunidad de esto ;)
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Alejandro

Creación de menús con GTKAda

Publicado por Alejandro (155 intervenciones) el 30/06/2023 23:17:10
Para crear menús en GTKAda, puedes utilizar la biblioteca "Gtk.Menu" y sus componentes relacionados. Aquí tienes un ejemplo básico de cómo crear una ventana con un menú y submenús:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
with Gtk.Main;
with Gtk.Menu;
with Gtk.MenuItem;
with Gtk.MenuBar;
with Gtk.Window;
 
procedure Menu_Example is
   -- Crear una ventana
   Window : Gtk.Window.Gtk_Window;
   MenuBar : Gtk.MenuBar.Gtk_Menu_Bar;
   FileMenu : Gtk.Menu.Gtk_Menu;
   EditMenu : Gtk.Menu.Gtk_Menu;
   QuitItem : Gtk.MenuItem.Gtk_Menu_Item;
   CopyItem : Gtk.MenuItem.Gtk_Menu_Item;
   PasteItem : Gtk.MenuItem.Gtk_Menu_Item;
 
   procedure OnQuit (Widget : access Gtk.Widget.Gtk_Widget'Class') is
   begin
      Gtk.Main.Main_Quit;
   end OnQuit;
 
begin
   -- Inicializar GTK
   Gtk.Main.Init;
 
   -- Crear la ventana principal
   Window := new Gtk.Window.Gtk_Window;
   Window.Set_Title ("Ejemplo de menú");
   Window.Set_Default_Size (300, 200);
 
   -- Crear el menú
   MenuBar := new Gtk.MenuBar.Gtk_Menu_Bar;
 
   -- Crear los elementos del menú
   FileMenu := new Gtk.Menu.Gtk_Menu;
   EditMenu := new Gtk.Menu.Gtk_Menu;
 
   QuitItem := new Gtk.MenuItem.Gtk_Menu_Item ("Salir");
   QuitItem.On_Activate (OnQuit'Access');
 
   CopyItem := new Gtk.MenuItem.Gtk_Menu_Item ("Copiar");
   -- Asignar una acción a la opción "Copiar"
 
   PasteItem := new Gtk.MenuItem.Gtk_Menu_Item ("Pegar");
   -- Asignar una acción a la opción "Pegar"
 
   -- Añadir las opciones al menú correspondiente
   FileMenu.Append (QuitItem);
   EditMenu.Append (CopyItem);
   EditMenu.Append (PasteItem);
 
   -- Añadir los menús al menú principal (menú bar)
   MenuBar.Append (FileMenu, "Archivo");
   MenuBar.Append (EditMenu, "Editar");
 
   -- Añadir la barra de menú a la ventana
   Window.Set_Menu_Bar (MenuBar);
 
   -- Mostrar la ventana
   Window.Show_All;
 
   -- Iniciar el bucle principal de GTK
   Gtk.Main.Main;
 
exception
   when others =>
      Gtk.Main.Main_Quit;
end Menu_Example;

Este es solo un ejemplo básico para ilustrar cómo crear una ventana con un menú y opciones. Puedes personalizarlo según tus necesidades y agregar acciones a las diferentes opciones del menú.

Si quieres profundizar más en la creación de menús con GTKAda, te recomiendo consultar la documentación oficial de GTKAda y explorar ejemplos más avanzados que se encuentren en la comunidad de Ada.

¡Espero que esto te sea útil! ¡Buena suerte con tu proyecto!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar