巧用OM命令解决调试打印中断问题

Author: 江苏 郑明达 Date: 1992-06-19

        1.按ESC键;
        2.答复来自屏幕的问答;
        3.中断后必须关闭打印机并转向屏幕输出,需要做的是:
        ①@PROW()+1,1 SAY “ ”(将打印等待序更置空)
        ②SET PRINT OFF
        ③SET DEVI TO SCRE
        至此,你才能去修改打印程序。
        为了简化上述操作过程,笔者编制了一个PRINT OFF程序,并把它作为一具过程随时加以调用(利用ON命令)。这样,当你编写打印程序时,只要在程序中加上如下两个语句就行了。具体地说,就是在运行程序时,只要你按下ESC键,机器就会自动完成上述所讲的一系列步骤。
        *以下为ESC中断转向处理调用语句,加在打印程序中:
        SET ESCA ON
        ON ESCA DO PRINTOFF
        *以下为PRINTOFF程序:
        @PROW()+1,1 SAY “ ”
        SET PRINT OFF
        SET DEVI TO SCRE
        CLEAR ALL
        CLEAR
        RETURN
        上述操作在dBASEⅢ+和FOXBASE中调试通过。