检测QR的打印错误(100分)

  • 主题发起人 少爷的拐杖
  • 开始时间

少爷的拐杖

Unregistered / Unconfirmed
GUEST, unregistred user!
现在需要达到如下目的。
1、打印一份表格
2、记录打印日期、打印份数。
于是我降打印代码和写数据库的代码放在一个try except里。
希望如果打印正确,那么写记录,否则不写记录。
却发现打印出错时没有产生例外。
请问如何才能检测QR的打印错误。或者有没有别的什么办法能达到
“除非打印成功才写记录否则不写记录”的目的?
 
这样的话,不如自己控制打印,更灵活一些,而不是用数据感知控件.
 
数据感知控件?没有用啊。您大概没理解我的意思。
 
我以为你是用的qr控件的,
我是说自己控制打印,不用这些控件,通过循环.
 
QuickRep1.Prepare ;
QuickRep1.Preview ;
QuickRep1.Print;
触发的东西事一样的,如果他们没有抛出异常,你当然捉不到。偶吃过亏了
 
to hbezwwl:
我用qr,但是没有用qrdblabel,全是qrlabel手动赋值。
自己控制打印。。。。太麻烦了吧
to 完颜康:
来点儿实质内容噻。不然不给你分!:(
 
问题的实质就是:如何得知QR.print是否正确执行了?
 
你这个实质基本上不能办到,不可知因素太多了,不如,打印机有没有接好,有没有卡纸都是问题,再说你安装个打印机,win都要让你试打一下,你想windows也不能确认打印是否成功...
 
我只不过是希望能拦截到打印出错的信息而已,出错原因具体是什么我可不管。
无法检测到打印时产生的例外好像不大可能吧?就算try except不行,总有别的
办法。
 
GetLastError?
 
查帮助写下如下代码,却发现try except管用了。气愤那。
。。。。。。
QRep_Project_MX.Print;
ErrorCode := GetLastError;
ErrorMessage:=SysErrorMessage(ErrorCode);
showmessage(inttoStr(errorcode));
LocalFree(hlocal(ErrorMessage));
。。。。。。。
 
多人接受答案了。
 
使用SetLastError 呢?
刚才使用a div 0 没有发现你的问题
 
顶部