Instrucción sencilla para contar los campos de una tabla paradox

[[David]]

Hola

Quiero hacer una versión rapida y demo , para demostración de mi programa , así que he pensado que donde insertan los artículos , si hay ya 3 articulos insertados no te deje insertar el cuarto .

Utilizo paradox , lo que busco es que instrucción básica , utilizo para en un if..then , si la tabla tiene 3 campos , salga el ShowMessage('En la versión demo sólo se pueden insertar 3 articulos') y luego le pongo un exit .

Quiero hacer esto si es posible para enviarlo hoy .

Se me olvidaba esta instrucción es para poner en una tabla (en un Query haces un Select count(*)) .

Un saludo y gracias de antemano .

[[Lepe]]

En paradox funciona el Recordcount, así que....

Código Delphi [-]
query1.sql.text := ' select * from tabla';
query1.Open;
if query1.Recordcount > 3 then
 raise Exception.Create('No se puede añadir más registros');

Levanto una excepción, así puedes situar eso en el BeforePost de la tabla, y al ser una excepción, no dejará guardar más registros (hablemos con propiedad )

Saludos