|
Hola Newbie y Marcos, un comentario, el ttable o el tquery al que le aplique el procedimiento abort en su evento BeforeInsert tal y como está declarado en el ejemplo no podrá ser usado para postear registros desde ningún otro control a través del ttable o tquery, si solo es para visualizar vale la propuesta de Marcos.
El SysUtils.pas es una unit de los fuentes de delphi que contiene un grupo de procedimientos y funciones utilitarias para el desarrollo de aplicaciones, entre ellas el procedimiento Abort que es el mismo que invocastes en tu ejemplo con el recordcount. En este caso podrias prescindir de declarar SysUtils.Abort; bastaría solo con Abort; para levantar la excepción silienciosa abortando la acción de insertar. Tambien pudieras, simplemente declarar la propiedad ReadOnly del DBGrid a true y de esta forma pudieras usar las TDataSet para introducir nuevos valores desde otros controles de la aplicación.
Espero haber ayudado
Saludos
|