|
From: Cesar P. T. <or...@us...> - 2001-05-17 10:18:40
|
Update of /cvsroot/acdo//acdo/src/gui
In directory usw-pr-cvs1:/tmp/cvs-serv3497/acdo/src/gui
Modified Files:
preferencias_pkg.adb
Log Message:
cambio en el orden de los botones de la ventana preferencias
Index: preferencias_pkg.adb
===================================================================
RCS file: /cvsroot/acdo//acdo/src/gui/preferencias_pkg.adb,v
retrieving revision 2.1
retrieving revision 2.2
diff -C2 -r2.1 -r2.2
*** preferencias_pkg.adb 2001/05/10 19:01:09 2.1
--- preferencias_pkg.adb 2001/05/17 10:18:38 2.2
***************
*** 143,161 ****
Gtk_New (Preferencias.Modificar, -"Modificar");
Set_Relief (Preferencias.Modificar, Relief_Normal);
! Set_UPosition (Preferencias.Modificar, 296, 208);
Set_USize (Preferencias.Modificar, 96, 32);
Button_Callback.Connect
(Preferencias.Modificar, "clicked",
Button_Callback.To_Marshaller (On_Modificar_Clicked'Access));
! Put (Preferencias.Fixed2, Preferencias.Modificar, 296, 208);
Gtk_New (Preferencias.Cancelar, -"Cancelar");
Set_Relief (Preferencias.Cancelar, Relief_Normal);
! Set_UPosition (Preferencias.Cancelar, 200, 208);
Set_USize (Preferencias.Cancelar, 96, 32);
Button_Callback.Connect
(Preferencias.Cancelar, "clicked",
Button_Callback.To_Marshaller (On_Cancelar_Clicked'Access));
! Put (Preferencias.Fixed2, Preferencias.Cancelar, 200, 208);
Gtk_New (Preferencias.Administrador, -"Mostrar utilidades de administración.");
--- 143,161 ----
Gtk_New (Preferencias.Modificar, -"Modificar");
Set_Relief (Preferencias.Modificar, Relief_Normal);
! Set_UPosition (Preferencias.Modificar, 200, 208);
Set_USize (Preferencias.Modificar, 96, 32);
Button_Callback.Connect
(Preferencias.Modificar, "clicked",
Button_Callback.To_Marshaller (On_Modificar_Clicked'Access));
! Put (Preferencias.Fixed2, Preferencias.Modificar, 200, 208);
Gtk_New (Preferencias.Cancelar, -"Cancelar");
Set_Relief (Preferencias.Cancelar, Relief_Normal);
! Set_UPosition (Preferencias.Cancelar, 296, 208);
Set_USize (Preferencias.Cancelar, 96, 32);
Button_Callback.Connect
(Preferencias.Cancelar, "clicked",
Button_Callback.To_Marshaller (On_Cancelar_Clicked'Access));
! Put (Preferencias.Fixed2, Preferencias.Cancelar, 296, 208);
Gtk_New (Preferencias.Administrador, -"Mostrar utilidades de administración.");
|