Por que no me puede borrar registros

[nemesio]

prueba de esta manera


Código Delphi [-]
consulta_eliminar := 'DELETE FROM T_LINEAS_FACTURAS WHERE FACT_CODIGO = :CODIGO'QRY_ELIMINAR_LINEAS.Close;

QRY_ELIMINAR_LINEAS.Close;
QRY_ELIMINAR_LINEAS.SQL.Clear;
QRY_ELIMINAR_LINEAS.SQL.Add(consulta_eliminar);

QRY_ELIMINAR_LINEAS.PARAMBYNAME('CODIGO').Value:=TBL_LINEAS_FACTURA.FieldByName('FACT_CODIGO').Value ;QRY_ELIMINAR_LINEAS.ExecSQL;
Suerte.