Uso de post con Firebird

[Neftali [Germán.Estévez]]

Por favor, utiliza TAG's cuando añadas código Delphi.

Empezado por martin17476

El Dataset no tiene índices.
Uso append.

Estábamos hablando de UPDATE, ahora hablamos de APPEND (insertar uno nuevo), que son cosas diferentes.

Empezado por martin17476

Aquí da el fallo. Valor 1 recibe valor 0, cuando debería recibir otro. Este campo1 es la clave primaria y es autoincrement.
He comprobado el valor de Table1.Campo1 y es correcto.

Es normal, porque ese valor no lo asignas tú, sino que al ser autoincrement lo asigna la Base de Datos de forma automática cuando se inserta el registro. Por lo tanto, para saber qué valor ha asignado la Base de Datos, debes hacer un Refresh o consultar manualmente ese valor asignado.

Empezado por martin17476

Esto no se refleja en pantalla. Con otra tabla, que si refleja en pantalla, y que tiene un campo autoincrement y es clave primaria, para ver dicho valor, he de hacer post y después refrescar.

Correcto. Pues eso justo es lo que has de hacer aquí.

¿Entonces cual es el problema?

[martin17476]

Gracias a todos por vuestra ayuda. Siento no haber usado el TAG de Delphi.
Leyendo con atención todo lo que habéis compartido aún sigue habiendo problemas. El código que he usado es:

Código Delphi [-]
Table1.Insert;
Table1.Campo2 := Valor2; //el Campo1 sería el Autoincrement
........
Table1.Post;
marca := Table1.GetBookmark;
Table1.Refresh;
table1.GotoBookMark(marca);
.....

Ahora el valor del campo Autoincrement no es 0, sino que corresponde al valor del último registro físico de la tabla, y no con el que acabo de insertar (el cual ha ido a otro lugar de la tabla).

Lo he resuelto con un Locate:

Código Delphi [-]
Table1.Post;
intCam := table1Camp.Value;
Table1.Refresh;
Table1.Locate('Camp',intCam,[]);

Ahora sí que voy al registro y el valor Autoincrement sí que es el correcto.

Pero sigo pensando que algo no va bien. Debería funcionar con el primer código.

Espero haberme explicado bien. Cualquier observación será de ayuda.