Modelo de parcial tlyso
Enviado por Pau Dunstan • 30 de Abril de 2018 • Documentos de Investigación • 690 Palabras (3 Páginas) • 230 Visitas
Para el sistema de administración de una empresa dedicada a la distribución de señales audiovisuales satelitales se tienen los siguientes arreglos types declarados en un módulo como globales y los siguientes archivos de texto plano:
Type TAdicional Concepto As String Fecha As Date Hora As Date End Type Type TCliente DNI As Long Nombre As String Apellido As String Domicilio as String Adicionales() as TAdicional End Type Global Cliente () As TCliente | Cliente.txt (DNI;Nombre;Apellido;Domcilio) 16.739.001;María Teresa;Funes;Riglos 623 04.109.374;Emilio;Rocca;Muñiz 13 22.931.892;Franciso;Tallarico;Miró 353 Cliente_Adicionales.txt(DNI;Concepto;Fecha;Hora) 07.223.816;La Era de Hielo 3;01/12/2009;3:00 16.712.881;Madonna en Argentina;02/12/2009;21:00 Adicionales.txt(Concepto) Roger Waters Berlin 1990 Ricky Martin Unplugged Madagascar 2 |
Se tiene la siguiente interfase gráfica presentada a continuación:
FrmClientes
[pic 1]
Nombre de los controles:
FmeOperacion; OptAlta; OptAdicional; OptConsultar
FmeCliente; LblDNI; LblNombre; LblApellido; LblDomcilio; TxtDNI; TxtNombre; TxtApellido; TxtDomicilio; CmdBuscar
FmeAdicionales; LblAdicionales; LblFecha; LblHora; LstAdicionales, TxtFecha; CboHora
CmdAceptar; CmdCerrar
A) FrmClientes_Initialize (20 puntos)
Codifique una subrutina FrmClientes_Initialize que cargue al array Cliente() la totalidad del contenido del archivo Cliente.txt, y luego llame al procedimiento Agregar_Adicionales (que NO deberá codificarse) que se encargará de incorporar los adicionales históricos solicitados por cada cliente, guardados en el archivo de texto plano Cliente_Adicionales.txt. Asimismo deberá cargar en el CboHora las horas de la programación, que serán en intervalos de 3 horas empezando desde las 0:00. Finalmente deberá poner el foco en control OptAdicional.
B) Agregar_Cliente (10 puntos)
Codificar la subrutina Agregar_Cliente que agregue un registro al arreglo Cliente () con los correspondientes datos de los textbox: DNI, nombre, apellido y domicilio.
C) CmdBuscar_Click (20 puntos)
Codificar el evento CmdBuscar_Click que deberá buscar al cliente en el arreglo Cliente(), de acuerdo al DNI ingresado por el usuario. En el caso de encontrarlo, se completarán los datos personales en los cuadros de textos correspondientes y:
- En el caso de haber seleccionado la opción “Adicional” se llenará el control LstAdicionales con los datos que surgen del archivo de texto plano Adicionales.txt.
- En el caso de haber seleccionado la opción “Consultar”, se llenará el control LstAdicionales con los adicionales del cliente ingresado, que surgen del arreglo Cliente(), con el siguiente formato: Adicional Fecha Hora.
Si el cliente no es localizado, deberá avisarse tal situación con un mensaje, y poner el foco en el objeto TxtDNI.
...