Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   En un DElete.. de un Grid.. (https://www.clubdelphi.com/foros/showthread.php?t=52317)

Libarra 17-01-2008 05:56:45

En un DElete.. de un Grid..
 
Que tal compañeros.. tengo un problemilla con una DbGRiD, mi cuestion es la siguiente el usuario al darle supr manda el aviso de Confirmacion de Eliminar el regitro seleccionado.. lo que intento hacer es que cuando el usuario Acepte la pregunta..que entre en una condicion y si se cumple.. pues que lo borre si no que no me permita borrarlo.. supongo que lo debo de hacer en el Evento BeforeDelete de la Tabla o estoy equivocado? si no es asi.. mi pregunta radica donde capturo la respuesta que el usiario dio..

Gracias...de antemano!

marcoszorrilla 17-01-2008 07:02:38

Así es, tienes que anular el aviso de la rejilla y del navegador y símplemente preguntar en el evento BeforeDelete del Ttable, si desea o no eliminar el registro.

Código Delphi [-]
procedure TDmVar.AgendaBeforeDelete(DataSet: TDataSet);
begin
  if Application.MessageBox('¿Seguro que desea eliminar este registro?','Atención',mb_OkCancel +
  mb_IconQuestion)= idcancel then
  abort;
end;
Un Saludo.

Libarra 17-01-2008 07:08:06

...
 
Cita:

Empezado por marcoszorrilla (Mensaje 258753)
Así es, tienes que anular el aviso de la rejilla y del navegador y símplemente preguntar en el evento BeforeDelete del Ttable, si desea o no eliminar el registro.


Código Delphi [-]procedure TDmVar.AgendaBeforeDelete(DataSet: TDataSet);
begin
if Application.MessageBox('¿Seguro que desea eliminar este registro?','Atención',mb_OkCancel +
mb_IconQuestion)= idcancel then
abort;
end;



Un Saludo.


Lo he probado.. y funciona a la perfeccion,.. muchas gracias.. la clave estaba en anular el confirDelete.. Gracias!!


La franja horaria es GMT +2. Ahora son las 22:47:25.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi