Numerar el detalle Maestro / detalle en secuencia

[[Lepe]]

Necesitas:

Para el maestro
- un campo auto inc


Para el detalle:
- Un campo LongInteger o del mismo tipo del auto inc
- Un autoinc

Ahora abres las "relaciones de las tablas" en access, añades ambas tablas y desde la tabla Maestro, arrastra el campo al campo LongInteger, cuando esté encima lo sueltas y Access te preguntará el tipo de integridad referencial que necesitas. Normalmente es uno a muchos con duplicados.

Ahora en Delphi, para insertar una línea detalle, siempre deberás hacerlo en este orden:
- Primero insertar en la tabla maestra
- Ahora enviar un insertar al detalle.

Al tiempo de guardar los registros:
-Primero guardar el maestro.
- Después guardar el detalle.

Saludos

Saludos.

[LordRF]

Hola por ejemplo lo puedes hacer asi:

con un query en la detalle

SELECT * FROM Maestra WHERE ID = :ID

procedure TDBM.DetalleAfterInsert(DataSet: TDataSet);
begin
  Detalle['ID'] := Maestar.FieldValues['ID'];
end;

y el resto ya lo pone arriab.

un saludo Robert

[[fjcg02]]

Te sugiero que utilices la propiedad Recno de las tablas/querys. Cuando abres una tabla/query hay un campo que es recno que te dice el nº de registro que se trata.
Para hacerlo. crea un campo calculado en la query Detalle, de tipo integer.
En el evento DrawDataCell del grid donde visualizas los datos, pon el siguiente código.

Código Delphi [-]
if field.Name='TablaCampo' and Tabla.RecCount> 0 
  then
         DBGrid.Canvas.TextOut(Rect.left+5, Rect.Top +5, inttostr(Tabla.recno));

Ten en cuenta que recno es un campo calculado por delphi, que no puedes editarlo, y que dependiendo del campo por el que ordenes la tabla detalle te numerará las lineas.

Espero que te sea util.

Un saludo