cancelar post??

[roman]

Empezado por marcoszorrilla

Pues acabo de hacer una prueba exactamente con tú código pero he descubierto que para tu propósito debe de utilizar el evento BeforeInsert

Pero el problema aquí será que sólo funcionará cuando se inserte un registro y no cuando se hagan cambios a uno existente.

En las pruebas que acabo de hacer hay dos formas de solucionarlo y básicamente es juntar lo dicho por jachguate con lo que ya había intentado elbetete:

Primera forma:

Código Delphi [-]
procedure TF_OPTIMONEY.QRY_CLIENTES1BeforePost(DataSet: TDataSet);
begin
  if NoQuiero then
  begin
    DataSet.Cancel;
    abort;
  end;
end;

Segunda forma:

Código Delphi [-]
procedure TF_OPTIMONEY.QRY_CLIENTES1BeforePost(DataSet: TDataSet);
begin
  if NoQuiero then
    abort;
end;

y rodear la llamada a Next con:

Código Delphi [-]
try
  Query1.Next;
except
  Query1.Cancel;
end;

Pero creo que la prmera forma es más correcta.

// Saludos