CPP2_Practica10_VtasDscto

/* prac10.cpp
Practica basada en la practica 4/PROMOCION DE VENTAS USA del Cuaderno de Ejercicios
de Programacion I. pag. 70.
Por: LSC Sergio Hugo Sanchez O.
Fecha: 09/05/2011 */

#include <radc++.h>
#include <stdio.h>
#include <stdlib.h>
#include <time.h>
#include <math.h>

/* Variables */
int nRandom;
double nGasto, nCargo;


Form Form1("Promocion de Ventas",86,166,430,312,RCP_SIMPLE);
TableView   TableView1("",AUTO_ID,14,7,200,125,Form1);
Label   lblQuestion("Introduzca la cantidad total de la compra:",AUTO_ID,28,153,202,25,Form1);
TextBox txtGasto("0",AUTO_ID,245,153,49,25,Form1);
Button  cmdPromocion("PROMOCION",AUTO_ID,308,153,100,25,Form1);
TextBox txtMsg(" ",AUTO_ID,21,181,387,25,Form1,true,true,false,false);
//TextBox   txtInfo("RECOMENDACIONES: Excelente si continua asi usted es un genio",AUTO_ID,21,196,385,68,Form1);
TextBox txtInfo(" ",AUTO_ID,21,220,385,25,Form1,true,true,false,false);
ImageBox icoImagen(AUTO_ID,0,224,14,64,64,Form1);


FormProcedure Form1_Procedure(FormProcArgs) {
    ON_CLOSE() {
        Application.close();
    }

    ON_COMMAND_BY(cmdPromocion) {
        txtMsg.visible = true;
        txtInfo.visible = true;

        nGasto = val(txtGasto.text);
        if (nGasto <= 100) {
           txtMsg.text = "Su GASTO NO SUPERA LOS 100.00, NO PARTICIPA EN LA PROMOCION"; }

           //txtMsg.text = "Su GASTO SUPERA LOS 100.00, PARTICIPA EN LA PROMOCION";
           // Generar la bola que se pondra el descuento.
           srand(time(0));
           nRandom = rand()%6;

           switch (nRandom)
           {
            case 1:
                 txtMsg.text = "ALEATORIAMENTE USTED OBTUVO UNA BOLA BLANCA";
                 icoImagen.loadImage( Application.path + "\\bBlanca.png");
                 nCargo = val(txtGasto.text);
                 txtInfo.text = "El total a pagar es de " + str(nCargo);
                 break;
            case 2:
                 txtMsg.text = "ALEATORIAMENTE USTED OBTUVO UNA BOLA ROJA";
                 icoImagen.loadImage( Application.path + "\\bRoja.png");
                 nGasto = val(txtGasto.text);
                 nCargo = nGasto - round(nGasto*0.10);
                 txtInfo.text = "El total a pagar es de " + str(nCargo);
                 break;
            case 3:
                 txtMsg.text = "ALEATORIAMENTE USTED OBTUVO UNA BOLA AZUL";
                 icoImagen.loadImage( Application.path + "\\bAzul.png");
                 nGasto = val(txtGasto.text);
                 nCargo = nGasto - round( nGasto * 0.20);
                 txtInfo.text = "El total a pagar es de " + str(nCargo);
                 break;
            case 4:
                 txtMsg.text = "ALEATORIAMENTE USTED OBTUVO UNA BOLA VERDE";
                 icoImagen.loadImage( Application.path + "\\bVerde.png");
                 nGasto = val(txtGasto.text);
                 nCargo = nGasto - round( nGasto * 0.25);
                 txtInfo.text = "El total a pagar es de " + str(nCargo);
                 break;
            case 5:
                 txtMsg.text = "ALEATORIAMENTE USTED OBTUVO UNA BOLA AMARILLA";
                 icoImagen.loadImage( Application.path + "\\bAmarilla.png");
                 nGasto = val(txtGasto.text);
                 nCargo = nGasto - round( nGasto * 0.50);
                 txtInfo.text = "El total a pagar es de " + str(nCargo);
                 break;

                  }

        // Si es falso
    }

    return 0;
}


rad_main()
    Form1.procedure = Form1_Procedure;
    TableView1.addColumn("COLOR");
    TableView1.addColumn("DESCUENTO");

    TableView1.addRow("Bola Blanca");
    TableView1.addCell(1,0,"0%");
    TableView1.addRow("Bola Roja");
    TableView1.addCell(1,1,"10%");
    TableView1.addRow("Bola Azul");
    TableView1.addCell(1,2,"20%");
    TableView1.addRow("Bola Verde");
    TableView1.addCell(1,3,"25%");
    TableView1.addRow("Bola Amarilla");
    TableView1.addCell(1,4,"50%");

//    txtNota.setLimit(4);
    txtMsg.visible = false;
    txtInfo.visible = false;

rad_end()