Cómo conectar interbase con delphi 7

[[felipe88]]

Prueba algo como esto...

Código Delphi [-]
// Esto en el evento BeforeInsert de la tabla en la que guardaras

procedure TForm1.Table2BeforeInsert(DataSet: TDataSet);
var cod : Integer; // Creas la variable
begin
  cod := Table1.FieldByName('cod_mer').Value + 1; // Table1 es la tabla de las mercancias, sea el nombre que le diste
  Table2.FieldByName('campo').AsInteger := cod; // Asignas a la tabla en la que guardaras el consecutivo
end;

Algo asi...