begin // your code writeln( 'Reccount = ' + intToStr( dbf.recCount ) ); dbf.zap; writeln( 'Reccount = ' + intToStr( dbf.recCount ) ); // your code end;