Hola Amigos
Hice unos cambios al Bingo 10, no a la última versión del Sr Mustafa, incorporando la dbf que genera el código del Sr Brunello, yo la denominé XBINGO75 porque hay una parte en cartones.prg que elimina las dbf temporales, entonces sólo puse una letra en la siguiente function ...
Code: Select all
*-------------------------------------------------*
FUNCTION EraserDBF()
*-------------------------------------------------*
dbCloseAll()
FileDelete("B*.dbf") // <---- Borra los dbf por estética --- AQUÍ SÓLO AUMENTÉ LA LETRA B
Respetando la presentación de los 2 Cartones que aparecen en pantalla del Sr Mustafa, incorporé el botón CHEQUEAR, debido a que los Cartones (o Tablas también le dicen) del Sr Brunello las numera del 1 al 100, entonces si un jugador canta Bingo, dirá su número de cartón y se lo buscará en la dbf y se mostrará dicho cartón en la pantalla baja, igual como se chequea los cartones del Sr Mustafa.
Pero noté que falta ordenar los números en el cartón que se busca en la dbf, aparece el 03 en la tercera columna, el 21 y el 25 en la cuarta, el 07 en el primer casillero donde debería ir el 03, el 44 antes del 33 y 35, el 45 y el 49 en la séptima y octava columna, cuando deberían estar máximo en la sexta columna ... en fin, estuve tratando de resolver eso pero me enredé
Adjunto las imágenes y el código que se ha modificado para que revisen cómo lo hice.
Saludos a todos.
Louis
P.D.- El programa del Sr Brunello se maneja en forma independiente, sólo para generar la dbf con los 100 cartones numerados.
