Ver Mensaje Individual
  #2  
Antiguo 12-01-2006
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Reputación: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
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
Responder Con Cita