error al guardar

[megaredoxk]

muchas gracias Caral, pero ahora me sale un error un "Key Violation" por que serà

[[Lepe]]

Porque has definido un campo como clave primaria (primary Key, pk) e intentas añadir un registro cuya clave primaria ya existe. Es normal que pase esto para no repetir información en la base de datos.

Ya que usas paradox, en cada TTable que uses, en el evento afterpost añade:

Código Delphi [-]
   Dataset.FlushBuffers

"Dataset" es el parámetro que tiene el evento. Flushbuffers (quizás esté mal escrito) fuerza a que se escriba el registro en la Base de datos, si se omite, el registro quedará en caché (casi siempre).

Saludos

[megaredoxk]

muchas gracias compañero Lepe, perome genera un error "Undeclarade Identifier FlushBuffers" y cuando me dices que lo force el programa no compila no se ejecuta.

[[Lepe]]

En ese caso, en lugar de usar "Dataset" usa el nombre de tu tabla, por ejemplo:

tblCliente.Flu (a partir de aquí, el code insight de delphi te dirá como se llama el método).

Pero ojo que eso no soluciona para nada el tema de la clave primaria, es solo para forzar la escritura a disco.

Saludos

[megaredoxk]

un placer saludarte compadre Lepe,
de todas formas la aplicación queda como que defectuosa, me gustaría saber como que me recomendaís para esta situación, yo lo que quiero es obtener los ingresos a una fecha determinada

[[Lepe]]

Saludos igualmente .

Lo primero será crear una clave primaria en la tabla, debe ser un campo que su valor, no se repita jamás en toda la vida del programa.

Cuando no tenemos un campo así (por ejemplo el DNI), se suele añadir uno llamado "ID" de tipo autoinc(remento) que tomará un valor consecutivo por cada registro añadido. De esa forma ya no dará el error de "clave primaria duplicada".

Si vas a buscar por fechas, es aconsejable crear (también en el Database desktop) un índice por ese campo. Así las búsquedas serán rapidísimas.

Si quieres ver los ingresos de un día determinado, tienes varias opciones, desde usar Filter:

Código Delphi [-]
tablaingresos.Filter := 'fecha = ' + FormatDatetime('mm/dd/yyyy', date); 
tablaingresos.Filtered := true; //

He puesto "date" para que muestre los ingresos del día al corriente, pero puedes usar un TDatetimePicker para que el usuario elija la fecha.

Si conectas un DBGrid a esa tabla, verás el resultado cuando se aplique el filtro.

O bien usar un TQuery (personalmente me gusta más), será más flexible.
En el inspector de objetos tendrás que establecer su propiedad Databasename

Código Delphi [-]
query1.sql.text := 'Select ingresos, fecha  from Nombretabla where  fecha between :fini and :ffin';
query1.parambyname('fini').asdate := datetimepicker1.date;
query1.parambyname('ffin').asdate := datetimepicker2.date;
Query1.Open;

También puedes enganchar un DBGrid para ver los resultados más cómodamente.

Saludos

[megaredoxk]

compadre Lepe le digo algo, no soy tan veterano en Delphi, màs bien novato, lo digo porq lo que usted me acaba de explicar se me hace un poco dificil de entender...de todas maneras le agradezco mucho y le pedirìa si es posible algo un poco màs detallado.

de todo corazòn le agradezco su explicaciòn.

que estes muy bien.