error al guardar

[megaredoxk]

un saludo muy especial.
tengo un problema con la tabla ingresos,tengo como index el campo fecha pero al guardar el ingreso solo guarda el ultimo ingreso generado y no deja guardado los anteriores
utilizo Paradox7

Table2.edit;
Table2.FieldByName('Ingreso').AsFloat := StrToFloat(Label3.Caption);
Table2.FieldByName('Fecha').AsDateTime := Date;
Table2.Post;
Table2.Next;

gracias