请大家帮忙，我解决不了用数据窗口打印收费发票问题？

[cgrong9999]

我现在正在设计用数据窗口打印收费发票，用Epson LQ-1600k针式打印机，设计时无法控制固定好的发票的大小、走纸问题，LQ-1600k中没有自定义纸张大小问题。而且在打印按纽中用
dw_1.Modify("DataWindow.Print.Paper.Size = 3")
dw_1.Modify("DataWindow.Print.Margin.Top=100")
等语句根本不起作用？请大家快快帮帮忙？

[xuebuctxy]

在printsetup()函数中有纸张大小的定义啊！打印的时候选择就行了

[xuebuctxy]

我还没用过paper.size，如果你没用错的话，是不是打印机不支持这样的纸张大小啊，选别的尺寸看看呢！

[xingjiaren]

改用套打算了，用程序控制走纸长度

打印时能使纸回退，打印完之后能能让纸前进一些，
适合于打票据的单位
long jobjob=printopen()
printsend(job,"~h1B~h6A~254")
printsend(job,"~h1B~h6A~100")
print(job,"")


print(job,400,*****,900)
..
..
..
print(job,6000,*****)
/*其中*****是你要在票据写字的地方需要的内容，该
内容需要你自己想办法取出来，并且400/900/6000等等需要你自己调试，
在epson针式打印机上通过。*/


printclose(job)
Job = PrintOpen()
printsend(job,"~h1B~h43~254")
printsend(job,"~h1B~h43~100")
printclose(job)

[joss]

1600没有试过不过670K我用过，一直很好用！

[xingjiaren]

printsend(job,"~h1B~h43~h18")
定义纸长

[sinkiangscorpio]

我就用过这个打印机,怎么会没有字定义纸张大小呢,我曾经由字定义换为
11*10过.
long Job
Job = PrintOpen()
PrintSend(Job,char(27) + char(50))//控制打印机以1/6英寸为单位进行换行
PrintSend(Job,"~h1BC~001")//控制打印机一行为一页
PrintDataWindow ( Job, dw_1 )
PrintClose(Job)
* *%%* *
//|\\
/// \\\\
天下美女我尽爱
_ _ \\\
@ @ \\\\
莫待花落空自叹
\\\\ ///~
︶ \\\\//~ zhugejunshi于2002年12月24日题词

[cgrong9999]

声明的变量：
Constant String gs_KeyODBC = 'HKEY_CURRENT_USER\SOFTWARE\ODBC\ODBC.INI\Dbmis'
Constant String gs_RegKey = 'HKEY_CURRENT_USER\SOFTWARE\Neusoft\Dbmis'

RegistrySet(gs_KeyODBC, 'Autostop', 'Yes')
RegistrySet(gs_KeyODBC, 'DatabaseName', 数据库名)
RegistrySet(gs_KeyODBC, 'DatabaseFile', 路径加数据库名)
RegistrySet(gs_KeyODBC, 'Driver', 相应数据库的odbc驱动)
RegistrySet(gs_KeyODBC, 'Start', 驱动文件)

这些解释可能不够准确，你手工键一个数据源，然后在注册表中HKEY_CURRENT_USER\SOFTWARE\ODBC\ODBC.INI找到你的那个名字，然后记下相应的值写在上面的汉字的地方就可以了

然后就可以：
SQLCA.DBMS = "ODBC"
SQLCA.AutoCommit = False
SQLCA.DBParm = "ConnectString='DSN=数据源名;UID=用户名;PWD=密码'"

connect using sqlca;