]> git.llucax.com Git - z.facultad/75.10/miklolife.git/blob - demo/src/Vistas/MantenerPrestaciones.cs
- Property FechaBaja para Prestacion
[z.facultad/75.10/miklolife.git] / demo / src / Vistas / MantenerPrestaciones.cs
1
2 using System;
3 using System.Collections;
4 using Gtk;
5 using Glade;
6
7 using Controlador.Afiliacion;
8 using Dominio.Afiliados;
9 using Dominio.Autorizaciones;
10 using Dominio.Planes;
11 using Dominio;
12
13 public class VMantenerPrestaciones
14 {
15         Glade.XML xml;
16
17         [Widget] TextView detalles;
18         [Widget] Entry file;
19         [Widget] ProgressBar progreso;
20
21         public VMantenerPrestaciones ()
22         {
23                 xml = new Glade.XML (null, "mantener_prestaciones.glade", "mantener_prestaciones", null);
24                 xml.Autoconnect (this);
25         }
26
27         public void OnActualizar (object o, EventArgs args)
28         {
29                 TextBuffer buffer = detalles.Buffer;
30                 buffer.Clear ();
31                 for (int i=1; i < 10000; i++) {
32                         progreso.Fraction = i/10000.0f;
33                         buffer.InsertAtCursor (String.Format ("Agregando {0} de {1}\n", i, 10000));
34                         detalles.ScrollToIter (buffer.EndIter, 0.0f, false, 0.0f, 0.0f);
35                         while (Gtk.Global.EventsPending)
36                                 Main.IterationDo (false);
37                 }
38         }
39
40         public void Run ()
41         {
42                 Dialog w = (Dialog)xml.GetWidget ("mantener_prestaciones");
43                 w.Run ();
44                 w.Destroy ();
45         }
46 }
47