实用屏幕拷贝程序

Author: 谢军华 Date: 1997-01-01

  如果要将显示在屏幕上的内容打印出来,我们一般用的是操作系统中的屏幕硬拷贝功能,但它有时并不很实用,因为它将屏幕上的无论有用还是无用的内容全部打印出来。下面的BASIC小程序,可以按人的意志打印指定区域的屏幕内容。
  C:\>TYPE PMKB.BAS
  INPUT X1,X2,Y1,Y2
  FOR I=Y1 TO Y2
  FOR J=X1 TO X2
  A=SCREEN(I,J)
  B$=B$+CHR$(A)
  NEXT J
  LPRINT B$
  B$=""
  NEXT I
  经编译生成可执行文件PMKB.EXE。当要进行屏幕拷贝时运行PMKB.EXE,输入拷贝范围即可方便实现。