Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Desactivar Ctrl-Del (https://www.clubdelphi.com/foros/showthread.php?t=29086)

IVAND 12-01-2006 02:22:41

Desactivar Ctrl-Del
 
Hola a todos


Tengo una pantalla y necesito desactivar el borrado que tienen las grillas es decir me posiciono en el registro y presiono Ctrl-Del me sale un mensaje donde tengo 2 opciones

Lo que necesito es eliminar ese mensaje y remplazarlo por uno mio como puedo hacerlo de antemano muchas gracias

roman 12-01-2006 02:42:45

Desactiva el mensaje por defecto poniendo en false la opción dgConfirmDelete en la propiedad Options del DBGrid.

En el evento BeforeDelete del dataset conectado a la rejilla usa algo como

Código Delphi [-]
procedure TForm1.Table1BeforeDelete(DataSet: TDataSet);
var
  Respuesta: Integer;

begin
  Respuesta := Application.MessageBox(
    '¿Desea borrar el registro actual?',
    'Borrar registro',
    MB_ICONWARNING or MB_YESNO);

  if Respuesta = idNo then
    abort;
end;

// Saludos


La franja horaria es GMT +2. Ahora son las 19:05:13.

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