CPP2_Practica11_Virus1

/* prac11.cpp
Simulacion de un virus
ADVERTENCIA: Esto es solo una simulacion y no afecta de ningun modo al sistema
sin embargo, puede parecer real para un usuario novato. Por favor, uselo con
cuidado. No nos hacemos responsables por el uso indebido de este programa*/

#include <radc++.h>
#include <windows.h>

int i;

/*void wait ( int seconds )
{
  clock_t endwait;
  endwait = clock () + seconds * CLOCKS_PER_SEC ;
  while (clock() < endwait) {}
}*/


Form form1("Virus",0,0,1024,768,RCP_2BUTTON2);
TextBox t1("**ERROR** Ha ocurrido un fallo en el sistema",AUTO_ID,0,10,400,20,form1,false,true,false,false);
TextBox t2("Un virus ha atacado su sistema....",AUTO_ID, 0,30,400,20, form1,false,true,false,false);
TextBox t3("Operating System missing",AUTO_ID, 0, 60, 400,20, form1,false,true,false,false);
TextBox t4("Desea formatear? (S/N)",AUTO_ID, 0, 90, 200, 20, form1, false);
TextBox t5("S", AUTO_ID, 200,90, 40, 20, form1);
TextBox t6("Formateando... Espere por favor...", AUTO_ID, 0, 120, 200, 20, form1, false);
TextBox t7(" %", AUTO_ID, 0, 145, 200, 20, form1, false);
String timer1 = "Timer1";

//TextBox t1("Soy caja texto",AUTO_ID,100,100,100,100,form1);

FormProcedure proc(FormProcArgs) {
      ACCEPT_COLORS();
      ON_CLOSE() Application.close();
      ON_TEXT_CHANGED( t5 ) {
          t6.visible = true;
          t7.visible = true;
          i=0;
          t5.enabled = false;
      }
      ON_TIMER_NOTIFICATION(timer1) {

           t7.text =str(++i)+ "%";
           if (i>=100)
               Application.close();
               // System.restart();

      }
      return 0;
}

rad_main()
     form1.procedure = proc;
     form1.backgroundColor = 0x000000;
//     form1.maximize();
     form1.setTimer(timer1, 500);


     t1.backgroundColor = 0xffffff;
     t2.backgroundColor = 0xffffff;
     t3.backgroundColor = 0xffffff;
     t4.backgroundColor = 0xffffff;
     t5.backgroundColor = 0xffffff;
     t6.backgroundColor = 0xffffff;
     t7.backgroundColor = 0xffffff;
     t6.visible = false;
     t7.visible = false;
     t5.focus();
rad_end()