problema guardar con interbase.
 

Buenas, tengo esta sentencia :

Si solo lo paso una vez funciona perfectamente, si lo paso en un bucle da un error y no sigue, el error lo da en el qry := TIBQuery.Create(qry);

He probado a poner un except y poner un qry1 := TIBQuery.Create(qry1); pero sigue dando el error pero esta vez al final.

Alguna idea ??

Prueba así:

Código Delphi [-]
...
 
qry := TIBQuery.Create(nil);
// No puedes poner el owner del objeto a él mismo
try
  qry.database := datamodule2.database; 
  Qry.SQL.Text := cadenaSQL;
 
  Qry.Prepare;
  Qry.execsql;
  Qry.unPrepare;
except
  Qry.Free 
  // Para ponerlo en un bucle deberás crear y destruirlo
end;

NOTA: No haría falta crearlo y destruirlo cada vez, simplemente limpiar la sentencia y volver a añadirla, pero aun así no debe dar ningun problema.
Si solo lo paso una vez funciona perfectamente, si lo paso en un bucle da un error y no sigue, el error lo da en el qry := TIBQuery.Create(qry);

Muchas gracias, me has salvado la vida :D ya funciona bien.

gracias gracias gracias