use jdk
dele all
pack
appe blan
appe blan
appe blan
appe blan
appe blan
appe blan

还有更好的方法吗

先说说这样做的目的

用来绑定录入单据的grid  录完一张 清空后 录下一张

sele

sele * from 表 where recn()<1 into curs aa

为表单建一个方法程序：程序名为AA，代码如下

CREATE CURSOR T (B1 I,B2 I,B3 M) &&结构内容自己设定
WITH THISFORM.GRID1
   .COLUMNCOUNT=FCOUNT([T])
   .RECORDSOURCE=[T]
   FOR I=1 TO .COLUMNCOUNT
      WITH .COLUMNS(I)
         .HEADER1.CAPTION=FIELDS(I,[T])
      ENDWITH
   ENDFOR
*根据需要自行添加代码
ENDWITH

在表单上添加一个COMMAND，CAPTION为清空，CLICK事件代码：
THISFORM.AA

表单INIT事件代码
THISFORM.AA


[ 本帖最后由 sdta 于 2013-5-24 14:44 编辑 ]

在表格控件中可以自动为表添加空记录的，而且利用滑动条可以不限制每份单据的条目数，打印输出时才考虑一份单据要多少张才能打印完毕。