[Lazarus-es] Problemilla con DeleteSQL

Giuseppe Luigi Punzi Ruiz glpunzi en lordzealon.com
Sab Ago 29 13:39:53 CEST 2009


Hola a todos,

En una query tengo:
DELETE FROM CLIENTES
WHERE IDCLIENTE = :OLD_IDCLIENTE

Luego, en un form, tengo un botón "Eliminar" que hace:
   if MessageDlg('¿Desea eliminar el cliente seleccionado?',mtWarning,  
mbOkCancel, 0) = mrOk then
	dmDatos.queryClientes.Delete;

Y en el botón que cierra el form:
   dmDatos.queryClientes.ApplyUpdates();
   dmDatos.Transacciones.Commit;
   Self.Close;

Si borro sólo un registro y cierro el form, no hay problema, pero  
cuando borro más de uno y lo cierro, me salta una excepción:
EDatabaseError
'No delete query specified and failed to generate one. (No fields for  
inclusion in where statement found)'.

No puedo dejar marcados para eliminar más de un registro antes de  
hacer el commit?

BBDD: Firebird

Lazarus 0.9.29 r21479M FPC 2.2.4 i386-darwin-carbon (beta)

Un saludo.

Giuseppe Luigi Punzi Ruiz
Blog: http://www.lordzealon.com
Twitter & Skype & GoogleTalk accounts: glpunzi









More information about the Lazarus-es mailing list