解决dBASE Ⅲ打印死锁故障的一种方法

Author: 昆明 马永涛 Date: 1992-05-08

        我在编2程序时采用了较为方便、又能解决死锁问题的方法。方法为:在打印显示语句@ prow(),pcol() say中,行号用j代替,即@ j,pcol() say;在每一行内容打印完后加上j=j+1语句,达到换行目的。在程序适当位置加上下列语句:
        IF j>=255
        set print off
        j=1
        set print on
        此时若行号大于或等于255时,计算机就自动改变行号为1。这样既不停机,又不出现空走纸现象,却能很好解决dBASIC Ⅲ打印行数超出255行而死锁的故障,提高了工作效益。作者认为该方法是可行的。特介绍给大家。