Ver Mensaje Individual
  #5  
Antiguo 23-11-2007
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Reputación: 29
Lepe Va por buen camino
Completando lo dicho por eduardocol

En el OnBeforeDelete, puedes hacer las dos cosas, preguntar si quiere borrar el registro y en caso afirmativo, primero cambiar los vencimientos, y después borrar.

Código Delphi [-]
procedure TForm1.Tabla1BeforeDelete(Sender:TObject; Action : TNoMeAcuerdo :P);
begin
  if Application.MessageBox('Confirmación', ¿Desea borrar el registro?, mb_yesno)= idyes then
  begin
    //   modificar los vencimientos y demás
  end
  else
    Action := daAbort;  // no borrará el pago y no hará nada con los vencimientos

Saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
Responder Con Cita