其实那个用TXT打开的文件是PRG文件，大侠知道如何使用FingerPrint ApplicationBuilder编写Intermec 打印机

你要编写Intermec打印机的脱机打印程序还是用Intermec机器语言嵌入到程序里打印标签？不管哪种方式，首先都得确滑瞎并认打印机的机器语言是Dp的还是IPL的。

若是神拿编写脱机打印信迹的话直接可以用记事本编写打印代码，然后通过超级终端把程序文件上传到打印机

DP语言示例：

PP10,10

FONTSIZE 25

FONTSLANT 0

FONTD "Song",17,0

NASCD "/ROM/GB2312.NCD"

PT "广州拓欣信息技术有限公司"

PF

楼上说的是，要与时俱进啊！

VFP是可视化编程，有专门的可仿陪碧视化”报表设计器“非常直观备举方便，而用PRG生成报表是在FoxBASE中使用，其控制行距用 ?chr(96)+'&n' , 改变"n"值就能改变行距，但在VFP中也被淘汰不用了。

如果是新编写打印表格，就用VFP的”乱敬报表设计器“吧。

如果是以前的老程序想在VFP中使用，就在PRG设置的报表中，在需要改变行距、字间距的地方用增加空行、空字符的方法吧。

1,把答岩哗下面的代码保存进一个prg文件(注意,由于复制进来格式被改了, 你复制后会发现多了好多空行,删除即可):

*--该函数的返回值能够舍去数字之间的零，比较准确，符合会计准则，比较适合打印银行存单等枣团。

PARAMETERS nAmount

LOCAL lliffu

DO CASE

CASE nAmount<0

nAmount=nAmount*-1

lliffu=.t.

CASE nAmount=0

RETURN '零元整'

ENDCASE

PRIVATE ALL LIKE L_*

L_S1= '零壹贰叁肆伍陆柒捌玖'

L_S2= '亿仟清行佰拾万仟佰拾亿仟佰拾万仟佰拾元角分'

nAmount=LTRIM(STR(nAmount*100,LEN(L_S2)/2))

L_LEN=LEN(nAmount)

L_SS2=RIGH(L_S2,2*L_LEN)

L_DX= ' '

L_0JS=0 &&连续零的个数

L_N=0

DO WHILE L_N <L_LEN

L_N=L_N+1

L_SZ=SUBSTR(nAmount,L_N,1)

L_SZ=SUBSTR(L_S1,2*VAL(L_SZ)+1,2)

L_DW=SUBSTR(L_SS2,2*L_N-1,2)

IF L_SZ= '零 '

L_SZ= ' '

DO CASE

CASE L_DW$ '亿元 '

CASE L_DW= '万 '

IF RIGH(L_DX,2)= '亿 '

L_DW= ' '

ENDIF

OTHERWISE

L_DW= ' '

ENDCASE

L_0JS=L_0JS+1

ELSE

IF L_0JS>0

L_SZ= '零 '+L_SZ

ENDIF

L_0JS=0

ENDIF

L_DX=L_DX+L_SZ+L_DW

ENDDO

L_DX=L_DX+IIF(RIGH(nAmount,1)= '0 ', '整 ', ' ')

l_dx=chrtran(l_dx,' ','')

RETURN IIF(lliffu,'负','')+L_DX

2, 比如保存文件名称为num2hz.prg, 放在目录d:\abc下, 举例:

set path to d:\abc

?num2hz(123456.12)

这就是把这个prg文件当成函数, 返回值就是文字

---