在FOXBASE程序中实现打印中的实时中断

Author: 南京 张力 Date: 1995-06-30

        1.FOXBASE应用程序中加入如下语句:
        set ESCAPE on
        set procedure to sptr &&打开过程文件程序sptr.prg
        on ESCAPE do ssss &&ESC响应之后转向 执行ssss过程
        2.过程文件程序sptr.prg:
        procedure ssss && ssss 过程
        run stpr.exe &&执行停止打印机打印驱动程序
        close data
        close all
        set devi to screen
        on ESCAPE &&撤消ESC响应
        return master &&返回主菜单
        3.中断打印机的打印程序stpr.c(TURBO C 2.0编制)
        # include <stdio.h>
        # include <bios.h>
        main ()
        {
        biosprint(1,0,0);/*打印机初始化*/
        return;
        }
        (南京 张力)