miércoles, julio 07, 2010

Una Demostracion de Archivos y Registros en Pascal

En esta ocasión presento un programita para demostrar el uso de registros y archivos en pascal interrelacionados, claro manejados directamente , sin uso de apuntadores que en determinado caso mejoraría uso en forma profesional , por la rapidez.

el codigo fuente en esta liga http://foros.solocodigo.com/viewtopic.php?f=34&t=43662

haciendo uso de busquedas, modificaciones , consultas , filtrados y borrado fisico de registros.
Tambien el uso de reportes a impresora por el puerto LPT, probado para la impresora Epson.













Esta es la pantalla del menu Principal

Esta es la pantalla de compras que alimenta a tres bases de datos mas, Proveedores, Departamentos y Productos (inventarios).













Este es el submenu de ventas:













Dentro del submenu venta, se encuentra la opcion Ventas al Publico, que es la pantalla que se ilustra abajo..













Opcion de cobrar ..












Mas abajo del menu en la opcion Catálogos tenemos
la siguente lista de submenus:












En la cual le proporcionamoes informacion a los catalogos , como el de productos, proveedores, usuarios etc...












departamentos...













proveedores...












ya estan listos lo Reportes :












Submenu Inventarios:













Submenu de reportes de compras:













Submenu de reportes de Ventas:


miércoles, diciembre 09, 2009

Calendario en Pascal

En dias pasados me tope con una liga del foro
www.lawebdelprogramador.
para ser mas exactos en esta liga
http://www.lawebdelprogramador.com/news/mostrar_new.php?id=69&texto=Pascal/Turbo+Pascal&n1=549029&n2=0&n3=0&n4=0&n5=0&n6=0&n7=0&n8=0&n9=0&n0=0
en el foro de pascal, donde solicitaban un calendario. yo nunca antes habia intentado hacerlo emprendi la tarea y he aqui los resultados, claro esto se realizo en mis cortos tiempos libres , por eso es que fue tardado.., proximamente compartire el codigo en www.solocodigo.com, en el foro de pascal.


algunas imagenes del code:






















imagenes del resultado en pantalla
cabe recalcar, que se puede ubicar el almanaque en pantalla ya que se cuenta con parametros tales como la fecha, columna, renglon, color texto, color fondo, que son caracteristicos para darle atributos












Una de la propiedades es que se puede desplazar con la flechas para modificar los meses y los años, ademas de seleccionar el dia del mes en que desee que termine la seleccion

















la funcion termina hasta darle la tecla ESC, o Enter en la opcion OK












Este ejemplo arroja la siguiente fecha 27-05-2000





Mas imagenes , con el cambio de colores:
























































el cuerpo del programa
queda asi

{cuerpo del programa}
var
Tecla:char;
Fecha:String[10];
Begin
textattr:=14+1*16;
clrscr;
Fecha:=formatDateTime('DD/MM/YYYY',Date);
Tecla:= FechaAlmanaque(Fecha,10,12,2,7); {fecha,columna,Renglon,color texto, color fondo, arroja una tecla de salida, que les podria servir en un futuro}

write (fecha);
readkey;
End.

aqui donde descargar el codigo ...
http://foros.solocodigo.com/viewtopic.php?f=34&t=41671
tendran que registrarse

martes, octubre 13, 2009

adaptando una funcion numeros a palabras

revisando una funcion para excell , de numeros a palabras , me pregunte por que no portarlo a pascal, y guardarlo para algun otro lenguaje..

he aqui parte del codigo en pascal











un programa ejemplificado de su uso











la salida del programa