Ver Mensaje Individual
  #5  
Antiguo 09-03-2017
Avatar de AgustinOrtu
[AgustinOrtu] AgustinOrtu is offline
Miembro Premium
NULL
 
Registrado: ago 2013
Ubicación: Argentina
Posts: 1.858
Reputación: 15
AgustinOrtu Es un diamante en brutoAgustinOrtu Es un diamante en brutoAgustinOrtu Es un diamante en brutoAgustinOrtu Es un diamante en bruto
Que base de datos?

Casi todas permiten retornar el Id generado en un Insert. Por ejemplo, en SQL Server se hace asi:

Código SQL [-]
INSERT INTO Tabla (campo1, campo2, ... campoN)
OUTPUT INSERTED.NombreCampoId AS AliasCampo
VALUES (valor1, valor2, ... valorN)

Y desde Delphi:

Código Delphi [-]
var
  qry: TADOQuery;
begin
  qry.SQL.Text := setear SQL
  // setear los parametros
  qry.Parameters.ParamByName('valor1').Value := valor1;
  // ejecutar el insert y obtener el id
  qry.Open; 

  Result := qry.FieldByName('AliasCampo').AsInteger;
end;
Responder Con Cita