Evitar Borrar más filas con DBGRID
 

Estoy usando los componentes de infopower TwwdbGrid, este componente lo tengo enganchado a una tabla pudiendo visualizar sus datos en la rejilla de datos.. si pulso ALT+SUPR se borra una linea (correspondiente a un registro de la tabla), hasta aqui todo bien, en las opciones de dicho componente he visto opciones de ocultar la pregunta "desea borrar, si o no?" incluso evitar que se borre ningún registro, pero yo lo que quiero saber es como saber que el componente ya está vacio, ya se han borrado todas las filas y evitar que en ese caso pulse alt+supr Para así evitar dicho error..

He intentado capturar las teclas en el evento del twwdbgrid keypress,.. etc Shif[ssALT] and VK_Delete etc. etc. pero nada, aunque intercepte el momento de borrar.. como evito que borre en ese momento...

espero haberme explicado con claridad..

Muchas gracias

Saludos

Para saber si la tabla esta vacio, utiliza: table1.IsEmpty (resultado booleano)

Si, yo puedo averiguar cuando ha pulsado alt+Supr y comprobar que la tabla esta vacia.. pero cuando sepa q si lo está.. como detengo la acción de borrar? esa es realmente mi pregunta.. kizá no me explike bien..

Muchas gracias

Puedes lanzar la excepción silenciosa Abort.

Código Delphi [-]
if Table.IsEmpty then
  Abort;

Saludos...

Bueno la opción de abortar no me ha resultado muy válida pero he encontrado una solución,

He ido al dbgrid y en options he kitado la propiedad de confirmación de borrado y luego en keyoptions la opcion de permitir borrar registros en el grid.. y en el evento keydown capturar las teclas ctrl+supr y si las pulsa y hay registros que borre y sino pues nada..

A pesar de ello muchas gracias por la idea

Nuppy