Ver Mensaje Individual
  #17  
Antiguo 05-02-2024
Avatar de duilioisola
[duilioisola] duilioisola is offline
Miembro Premium
 
Registrado: ago 2007
Ubicación: Barcelona, España
Posts: 1.757
Reputación: 21
duilioisola Es un diamante en brutoduilioisola Es un diamante en brutoduilioisola Es un diamante en bruto
Igual que en un SELECT...

No conozco BCB pero supongo que hay algo así como FieldByName().

Código:
Query->Close();
Query->SQL->Text = "EXECUTE PROCEDURE Act_Libro (:Registro, :Titulo, :Autor, :Genero, :Situacion)";
Query->ParamByName("Titulo")->AsString       = Titulo_libro->Text;
Query->ParamByName("Autor")->AsString        = Autor->Text;
Query->ParamByName("Genero")->AsString       = Genero_libro->Text;
Query->ParamByName("Situacion")->AsString    = Situacion_libro->Text;
Query->ParamByName("Registro")->AsInteger = this->Tag;
Query->ExecSQL();

RegistroCreado = Query->FieldByName("newrec")->AsInteger;

Query->Transaction->Commit();
Responder Con Cita