error al guardar

[[Caral]]

Hola

Código Delphi [-]
Table2.Insert;
Table2.FieldByName('Ingreso').AsFloat := StrToFloat(Label3.Caption);
Table2.FieldByName('Fecha').AsDateTime := Date;
Table2.Post;

Si usas edit editara el campo en donde este.
Si usas insert insertara un nuevo registro.
Tambien se puede usar append.
Saludos

[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