vfp如何控制打印的份数 [问题点数:40分]

Bbs1
本版专家分:0
结帖率 0%
Bbs1
本版专家分:0
不能控制打印份数!!
rn在quickrep.printsetting.copis:=4rnquickrep.printrn<em>打印</em>只有一次?
VB+datareport 怎样控制打印份数 ???
Dim oldSet As Integerrn rn oldSet = Printer.Copies rn Printer.Copies =val(text1.text )‘ <em>打印</em> text1中显示<em>份数</em>rn datareport1.PrintReportrn rn 只<em>打印</em>出 1 份。rnrn 代码应该怎样写才能<em>打印</em>出所要的<em>份数</em> ?rn rn 除了rn for i = 1 to text2.textrn datareport1.PrintReportrn next irnrn 还有其他方法么,急!
Jasperreports求助~ 如何控制打印份数
小弟最近在写的项目里有个<em>打印</em>功能需要统计<em>打印</em><em>份数</em>。就是<em>打印</em>对话框里填的那个<em>份数</em>。rnJasperreport 里<em>打印</em>代码就如下两行rnJasperPrint jasperPrint = new JasperPrintWithDataSource(reportFilePath, params, dataSource).getJasperPrint(); rnJasperPrintManager.printReport(jasperPrint, true);rnrn这样是调用本地的<em>打印</em>对话框的,那个<em>打印</em><em>份数</em>显然是不可能传回来的。rnJasperPrintManager 里现实的方法貌似没有可以<em>控制</em><em>打印</em><em>份数</em>的 只有<em>控制</em><em>打印</em>页数的printpagesrn在网上百度无果 google看不懂 求有经验的大哥指教
关于报表打印份数控制
我本想在beforeprint 事件中对所需<em>打印</em>报表的<em>份数</em>与数据库中的<em>份数</em>比较作差,但在每次preview 时beforeprint事件都触发,都调用我编的一个对<em>份数</em>(copys)更新值的函数,结果不是我想要的。我现在想判断一下只有在报表preview后点击了print按钮设一个标志位,才触发这个函数但不知道怎么作请帮个忙。谢谢
如何控制一个WORD文档的打印份数
问题:rn需要<em>控制</em>一个文档的<em>打印</em>次数,也就是说文档打开后就只能<em>打印</em>N份,超过后就不能正常<em>打印</em>。例如一次打开文档,<em>打印</em>5份,那么下次打开文档就最多<em>打印</em>5份了。rnrn我打算在文档中插入一个COM组件来<em>控制</em><em>打印</em><em>份数</em>,可是我<em>如何</em>得知当前<em>打印</em>数是总共<em>打印</em>的第几份。如果知道是第几分,就可以禁止。rn防止硬拷贝的问题不用考虑,因为WORD文档不会在本地保存,都是下载后打开WORD<em>打印</em>,WORD保存,保存为,拷贝文本已经禁止。rnrn注明:不能用VBA,因为宏一禁用,所有<em>控制</em>就没有了rn希望大家给我些建议或者有其他的解决方案也可以rn谢谢大家!分数不是问题,解决后高分相赠!rnrn
datareport 怎样控制打印份数 ???
Dim oldSet As Integerrn rn oldSet = Printer.Copies rn Printer.Copies = 3 ‘ <em>打印</em> 3 份rn datareport1.PrintReportrn rn 只<em>打印</em>出 1 份。rnrn 代码应该怎样写才能<em>打印</em>出 3 份 ?rn rn 除了rn for i = 1 to 3rn datareport1.PrintReportrn next irnrn 还有其他方法么 ?rn
打印打印份数控制?难题!!!
小弟现在在一个项目里需要将一个表单<em>打印</em>出来,该表单在任何情况下只有一页,但是要求只能<em>打印</em>一份。也就是说单击“<em>打印</em>”时,要限制<em>打印</em>机设置中的<em>份数</em>,仅为“1”,用户不能更改<em>打印</em><em>份数</em>。rn另外,我使用了自己写的<em>打印</em>控件来画表单,有没有方法在我的控件发送<em>打印</em>文档之前就将<em>打印</em><em>份数</em>限制成“1”呢?rn如果不行,那用什么方法能调用<em>打印</em>设置中的<em>份数</em>方法?rn现在已经可以限制纸张大小、纸张方向了。rnrn请高手赐教!! 全部财产100分送正解!!!谢谢啦!!!!
如何限制打印份数
<em>如何</em>限制<em>打印</em>的<em>份数</em>?如只允许<em>打印</em>4份。
FastReport 直接打印怎么控制打印份数
Report report = new Report();rnreport.Load(...);rnreport.RegisterData(...);rnreport.PrintSettings.ShowDialog = false;rnreport.Print();rnrnrn不显示<em>打印</em>是这样。可是这样只能<em>打印</em>一份啊。怎么可以<em>打印</em>多份啊?,求大神帮忙?
如何控制vfp下报表的打印
用<em>vfp</em>开发管理系统,在报表设置中,<em>如何</em><em>控制</em>可以使得每页都能正好打满?比如一页能打10条记录,现只有一条记录,要求除<em>打印</em>一条记录外,其余打成9条都以空表格形式<em>打印</em>。(向表中追加空记录这种方法除外!)
如何实现打印机的打印份数控制及纸张方向控制?
<em>打印</em>报表或IE窗口中内容,因有一部分报表是用超文本做的;rn有部分报表的<em>打印</em><em>份数</em>是固定的,请问<em>如何</em>实现?rn
请问用VB调用WORD打印...如何控制打印份数?
比如我调用WORD的文章<em>打印</em>...想一次打4份...<em>如何</em>实现?
如何控制打印ACTIVEREPORT2。0的打印份数(在线等待)
<em>如何</em><em>控制</em><em>打印</em>的<em>份数</em>,而且要求在<em>打印</em><em>份数</em>之前,使<em>打印</em>机自动复位。rn如要<em>打印</em>10张单据,要<em>打印</em>两份,可以先<em>打印</em>10张单据,再复位,再按<em>份数</em>依次<em>打印</em>。这样每打一份为一个<em>打印</em>任务,但<em>打印</em>机不会复位,导致纸张位置不对。rn如果能够做到将所有<em>份数</em>的<em>打印</em>任务一次提交,我想也可以实现,想问问大家有什么好的想法或实现思想。(急盼佳音)
如何设置打印打印份数
单位员工对<em>打印</em>机用量太浪费了,我想设置<em>打印</em>机每份文件<em>打印</em>份<em>打印</em>数不超过3份,请问高手们,能有这样的设置吗?
Activereport如何设定打印份数
-
如何锁定Word的打印份数
<em>如何</em>锁定Word的<em>打印</em>对话框中的<em>打印</em><em>份数</em>?使用户不能够更改?
如何监视Word的打印份数
我通过对Application对象的DocumentBeforePrint事件进行记录实现了对<em>打印</em>次数的监视。rn但是我现在无法监视每次<em>打印</em>的<em>份数</em>。不知道应该<em>如何</em>处理?rn
打印监控---请教如何获取打印份数
我做了个<em>打印</em>监控的程序,通过调用EnumJobs返回的JOB_INFO_1和JOB_INFO_2能得到<em>打印</em>页数,文档名等信息,可是该结构体中没有<em>份数</em>,应该怎么得到<em>份数</em>啊?请高手指点迷津!
vfp如何控制打印问题?
在<em>vfp</em>中,report <em>如何</em><em>控制</em><em>打印</em>进程,比如只<em>打印</em>前10页,或50页?
VSPrinter打印份数的问题
我想在<em>打印</em>多页时,其中有一页要<em>打印</em>多份,而Copies属性是所有页的<em>份数</em>
在Delphi中如何控制打印份数?(在线等待!)
在Delphi中<em>如何</em><em>控制</em><em>打印</em><em>份数</em>?我的源代码如下:rnvarrn App,Item:OleVariant;rn Fn:String;rn ADevice,ADriver,APort:Array[0..255] Of Char;rn DeviceHandle:THandle;rn DevMode:PDeviceMode;rn Printer:TPrinter;rnbeginrn If PrintDialog.Execute thenrn beginrn Printer:=TPrinter.Create;rn Fn:=ExtractFilePath(Application.ExeName);rn Fn:=Fn+'Doc\temp.doc';rn app:=CreateOleObject('Word.Application');rn app.Application.Options.CreateBackup:=False;rn App.Application.Options.SaveNormalPrompt:=False;rn App.Application.Options.SavePropertiesPrompt:=False;rn Item:=1;rn If (Not dm.Data.Prints.FieldByName('PrintImage').IsNull) and (dm.Data.Pacts.FieldByName('Act').AsBoolean) thenrn begin //盖章并<em>打印</em>合同rn TBlobField(dm.Data.Pacts.FieldByName('Pact')).SaveToFile(Fn);rn Sleep(50);rn app.application.documents.open(Fn);rn ClipBoard.Clear;rn Photo.CopyToClipboard;rn app.Application.Documents.Item(Item).Sentences.Last.Paste;rn endrn Elsern beginrn ShowMessage('不存在指定的章或者该合同是无效合同!');rn Exit;rn end;rn Printer.GetPrinter(ADevice,ADriver,APort,DeviceHandle);rn If DeviceHandle=0 thenrn beginrn Printer.PrinterIndex:=Printer.PrinterIndex;rn Printer.GetPrinter(ADevice,ADriver,APort,DeviceHandle);rn end;rn If DeviceHandle=0 thenrn Raise Exception.Create('不能初始化<em>打印</em>驱动程序,<em>打印</em>失败!')rn Elsern beginrn DevMode:=GlobalLock(DeviceHandle);rn With DevMode^ dorn beginrn dmFields:=dmFields Or DM_COPIES;rn dmCopies:=PrintDialog.Copies;rn end;rn App.Application.Documents.Item(Item).PrintOut;rn end;rn Sleep(9600);rn ClipBoard.Clear;rn App.Application.Documents.Item(Item).Saved:=True;rn App.Quit;rn DeleteFile(Fn);rn GlobalUnlock(DevMode);rn end;rnend;rn可是,为什么<em>控制</em>不了呢?希望各位高手赐教!
VFP控制Excel打印报表
一个完整的管理系统,报表的<em>打印</em>输出的好坏往往决定着整个系统的成功与否,而报表的<em>打印</em>正是Vfp的弱项;Excel的报表<em>打印</em>输出的特点非常突出,特别是整个报表的缩放和每行内字体的自动缩放和换行都十分方便,若把两个软件结合起来运用,取长补短,发挥各自的强项,将使我们的系统更加完美,还好微软为我们提供了良好的兼容方法,现在我就向大家推荐一种我一直在用的DBF转为Excel进行报表<em>打印</em>的方法,这种方法我觉得既简单又实用,非常方便!
请问要怎么样设置word打印控制的密码和打印份数
开发嵌入word的ocx控件,其中一项功能是能够设置该WORD文档的<em>打印</em><em>控制</em>的密码和<em>打印</em><em>份数</em>,请教实现思路:rn1、DocumentBeforePrint 是Word.Application的内置事件。跟ThisDocument不同,Word.Application 没有相应的类模块。通常,如果您需要使用它的内置事件,您需要在类模块中使用WithEvents关键字声明一个该对象类型的模块级对象变量。rn2、如果VBA编程的话,保存宏命名FilePrint就可以了,该方法<em>如何</em>用VC实现。rn3、隐藏<em>打印</em>按钮,自己重新写一个上去。rn望各路高手出招!谢谢!
FastReport 3.03怎么控制打印数量或打印份数
如题,
打印份数收费问题
一款简单的收费软件,自己可以更改部分程序即可使用,只供参考
datawindow 打印份数问题
在<em>打印</em>时需要<em>打印</em>几份 在每份下面写上 “第几份 第几页” 如<em>打印</em>3份 就是 “第1份 第1页”、“第2份 第1页”、“第3份 第1页”这个怎么实现 谢谢 分不够再加
请问要怎么样设置打印控制的密码和打印份数
如题
如何调出打印任务,并设置打印份数重新打印
有一台Windows 2003服务器上共享了一台<em>打印</em>机,并且有一些Mac机连接至这台共享的<em>打印</em>机上。由于Mac机的处理较为复杂,并且RIP一份复杂的文件可能需要近两小时,希望直接从共享<em>打印</em>机进行处理,希望达到以下效果,希望熟悉<em>打印</em>机API的朋友帮帮忙,谢谢!rn1.获得<em>打印</em>机的任务清单rn2.在<em>打印</em>清单上设置<em>打印</em>的<em>份数</em>(因为直接从Spool<em>打印</em>速度会快很多)
vfp如何控制打印機來打印條碼?
在<em>vfp</em>中條碼已經生成,但沒法<em>控制</em><em>打印</em>機,不知能否<em>打印</em>?<em>如何</em><em>打印</em>?rn或者通過別的方法(第三方控件等等)也行,rn請大蝦不吝賜教,分不夠再送!rn代碼如下:rn...rn比如:rnBCSTR='10101110110001001001000101111010100111001001101010111001010011101001110101110011100101101100101'rn?????往下<em>如何</em>寫代碼rnrn可以參考以下VB的代碼:rn...rnPrinter.DrawWidth = 1rnPrinter.ScaleMode = vbTwipsrnDim x As Integerrnx = Printer.ScaleX(intXPos, vbMillimeters, vbTwips)rnDim y As Integerrny = Printer.ScaleY(intYPos, vbMillimeters, vbTwips)rnDim intheight As Integerrnintheight = Printer.ScaleY(intPrintHeight, vbMillimeters, vbTwips)rnFor i = 1 To Len(BCSTR)rn bcd = Mid(BCSTR, i, 1)rn Select Case bcdrn Case "0"rn 'Form1.Line (50 + i*100, 50)-Step(1*100, 100), , BFrn Case "1"rn Printer.Line (50 + i * 18.5, 50)-Step(18.5, 1000), , BFrn End SelectrnNext irnrnrn
vfp如何使用打印条件控制打印内容
我要通过表单上输入的一个数字<em>控制</em><em>打印</em>的位置,rn该<em>如何</em>写程序和设置报表啊?rn
在quickrep中如何设置打印份数?
在quickrep中<em>如何</em>设置<em>打印</em><em>份数</em>?
vfp 如何控制报表
---------------------------------------------rn| |rn| |rn| |rn| |rn| |rn| |rn| |rn| |rn---------------------------------------------rn这是一张A3报表,共30条记录。<em>如何</em><em>控制</em>,第2页,不到30条记录时,最后的横线,在最后的记录后面。rnrn如:rnrn---------------------------------------------rn| |rn| |rn| |rn| |rn---------------------------------------------rn如果你后的 建议赐教rnrnmsn:beiziyun208@hotmail.com
windows forms中如何设置打印份数
写了一个程序,用的是.net 中的<em>打印</em>控件.客户要求同样的内容要<em>打印</em>三份,请问这在<em>打印</em>控件中怎么设。<em>打印</em>控件用的是PrintDocument.
不用printdialog类如何获得打印份数
我没有用printdialog类,用api 函数拦截作业信息,怎样在程序中获得弹出的<em>打印</em>对话框的<em>打印</em><em>份数</em>rn信息。
Fastreport2.5 如何根据变量实现打印份数
比如我要<em>打印</em>一个商品标签 点中要<em>打印</em>标签的商品 在输入 5 点击<em>打印</em>的时候可以自动<em>打印</em>出5份 该商品的标签rn我不想通过程序来<em>控制</em><em>打印</em><em>份数</em>。 <em>如何</em>通过fastreport来实现呢? rn <em>打印</em>多少份这个数字在<em>打印</em>方案中可以通过变量来获取这个值..
如何设置QReport的表单打印份数
调用QReport.Print方法可以<em>打印</em>一个表单,如果我想设置让它<em>打印</em>一份以上,该设置什么属性?
如何设置数据窗口的打印份数
请教各位:rn<em>如何</em>不通过多次retrieve的方式,来设置<em>打印</em>的<em>份数</em>rn<em>如何</em>将windows自带的<em>打印</em>设置界面调用出来,它里面就要<em>打印</em><em>份数</em>的设置rn。。。。。。。。。。。。
请问HP1000打印机的打印份数如何取得?
目前做个<em>打印</em>机监控程序,单位使用的HP1000<em>打印</em>机取出的<em>打印</em><em>份数</em>始终为1rnDEVMODE结构里的dmCopies始终为1,rnWord2003已经升级至最新版本,rn请高手指点,不胜感激!
请问能不能设置打印份数
想设置每份报表<em>打印</em>两份。。rn
MFC 打印份数ncopies的问题
jiangsheng,您好! 问您个问题:rn我想用nCopies接受外面输入的<em>打印</em><em>份数</em>(比如2),但只能<em>打印</em>一份! 我想知道为什么,该怎么实现<em>打印</em>多份! 谢谢!rnBOOL CSOfficeView::OnPreparePrinting(CPrintInfo* pInfo)rnrn ULONG IsPrintCtrl = PP;rn if (IsPrintCtrl!=0) //设置了<em>打印</em><em>控制</em>rn rn if (!pInfo->m_pPD->GetDefaults()) //GetDefaults will not display a dialog //but will get device defaultsrn return FALSE;rn if(!(pInfo->m_pPD->m_pd.Flags & PD_PAGENUMS))rn rn pInfo->m_pPD->m_pd.nFromPage = pInfo->m_pPD->m_pd.nMinPage;rn pInfo->m_pPD->m_pd.nToPage = pInfo->m_pPD->m_pd.nMaxPage;rn rn if(!(pInfo->m_pPD->m_pd.Flags & PD_USEDEVMODECOPIESANDCOLLATE))rn rn pInfo->m_pPD->m_pd.nFromPage = (WORD)nStartPage;rn pInfo->m_pPD->m_pd.nToPage =(WORD)nEndPage; rn [color=#FF0000]pInfo->m_pPD->m_pd.nCopies=(WORD)nPrintCopies;//只能<em>打印</em>一份!我想知道原因![/color] rn rn rnrn else //没有设置<em>打印</em><em>控制</em>rn rn if (pInfo->m_pPD->DoModal() != IDOK)rn return FALSE;rnrn if (!(pInfo->m_pPD->m_pd.Flags & PD_PAGENUMS))rn rn pInfo->m_pPD->m_pd.nFromPage = pInfo->m_pPD->m_pd.nMinPage;rn pInfo->m_pPD->m_pd.nToPage = pInfo->m_pPD->m_pd.nMaxPage;rn rn pInfo->m_pPD->m_pd.nCopies=(WORD)pInfo->m_pPD->GetCopies();rn rn if (!COleDocObjectItem::OnPreparePrinting(this, pInfo))rn return FALSE;rnrn return CView::OnPreparePrinting(pInfo); rn rn
关于PFC打印份数的问题
最近用 pb6.5+pfc 开发了一个小程序,结果发现其在<em>打印</em><em>份数</em>时有问题,不管你将<em>打印</em><em>份数</em>设为多少(>1)时,总是只打出一份,请高手帮忙解决。
Delphi自动设置打印份数
我用的是Delphi6.0, 用了quickreport和printdialog控件,想实现下面的功能:rnrn从系统中将数字带入Edit里,然后当用户按下“<em>打印</em>”按钮时,<em>打印</em>界面出现rn的同时<em>打印</em><em>份数</em>等于Edit里的数字,这样用户就不用再手动调整了。rnrn本人初学Delphi,还望前辈们多多指教,谢谢。
打印份数的问题!?Copies不起作用?!
this.printDialog = new PrintDialog();rnthis.printDialog.AllowSelection = true ;rnthis.printDialog.AllowSomePages = true ;rnthis.printDialog.AllowPrintToFile = true ;rnthis.printDialog.Document = this.pd ;rnif(this.printDialog.ShowDialog()==DialogResult.OK)rnrn this.pd.DocumentName = "工具(使)借用单据";rn //this.pd.PrinterSettings.Copies = this.printDialog.PrinterSettings.Copies;//这句不起作用,是不是这样设的rn this.pd.Print();rnrn俺想<em>打印</em>多份,可是怎么设就不起作用?老大们这是怎么回事?
VS2010水晶报表设定打印份数
VS2010水晶报表在C#代码里可否设定<em>打印</em><em>份数</em>?
VFP中如何调用VFP的打印预览
我的菜单栏有:<em>打印</em>选项,<em>打印</em>预览,<em>打印</em>.这三个子菜单,请问代码该怎么写,才能调用VFP系统的<em>打印</em>rn请大虾们提供具体的操作步骤...多谢.
有关水晶报表web打印如何指定打印份数的问题
用的是vs2005自带的水晶报表,版本号应该是10吧rn现在有一些报表 在客户端<em>打印</em>时, 需要设置为 “默认<em>打印</em>3份”rn客户的服务器端托管在电信机房通过互联网访问,所以是不可能通过 printToPrinter<em>打印</em>到服务器端<em>打印</em>机来实现的rn难道就没有别的办法能实现这一功能吗?
QReport打印多份时,如何记录打印份数的序号??
因为表单要一式三联。三份中分别标识第n联!rn<em>如何</em>简单实现???rnrn望高手指教!分再加……
谁知道如何打印队列中得到打印份数的信息
谁知道<em>如何</em>从<em>打印</em>队列中得到<em>打印</em><em>份数</em>的信息
PrintDialog和PrinterSetupDialog 打印机选择以及打印份数控制
1、QuickRep做了一个<em>打印</em>表,单页.rn2、PrintDialog.Executern 使用PrintDialog选择<em>打印</em>机,设置<em>打印</em><em>份数</em>,选择非默认的<em>打印</em>机rn3、QuickRep.Printrnrn<em>打印</em>结果问题:rn1、只<em>打印</em>了一份rn2、自动使用默认<em>打印</em>机,并非我选择的<em>打印</em>机rnrn请问 这是什么问题?谢谢大家
C#控制本地打印机和打印份数。。。求帮忙
[img=http://img.my.csdn.net/uploads/201303/19/1363664067_4162.png][/img]rn求C#方法<em>控制</em><em>打印</em>次数。。[img=https://forum.csdn.net/PointForum/ui/scripts/csdn/Plugin/001/face/83.gif][/img]
VFP打印
在VFP5.0下使用制表符进行<em>打印</em>时,表格线为何对不齐?
vfp打印工具vfp打印预览代码
<em>vfp</em><em>打印</em>预览表单 <em>vfp</em><em>打印</em>工具 直接调用
VFP中如何控制EXCEL?
请教哪位高手有比较全面的关于VFP中<em>控制</em>EXCEL的语句。rn给贴一贴!!!rntobegining@sina.com
vfp如何加入一些控制
在<em>vfp</em><em>如何</em>加入一些ocx,dll,api這一內的文件到<em>vfp</em>6.0,<em>vfp</em>7.0中使用?
如何打印vfp绘图结果
用<em>vfp</em>在窗口绘制图形 如line.绘制后<em>如何</em>在<em>打印</em>机上输出rnrn
VFP报表中如何控制分别打印每条记录
-
VFP报表中如何控制打印当前记录
不好意思,我想知道在VFP报表中<em>如何</em><em>控制</em><em>打印</em>当前记录,不知道哪位兄弟姐妹可以帮忙?rn不胜感激!!!rnrn
VB6 调取EXCEL 打印时指定 打印范围和打印份数
ActiveWindow.SelectedSheets.PrintPreview  ActiveWindow.SelectedSheets.PrintOut From:=1, To:=2, Copies:=2, Collate :=True 上面的代码设置<em>打印</em>的页面数为从1到2,<em>打印</em><em>份数</em>为2。 Function Brower_Excel() As Boolea
如何控制打印页面?
想做一个基于Web方式的收费系统,准确用jsp开发. rn涉及到票椐<em>打印</em>的问题.通常浏览器下的<em>打印</em>都是页面<em>打印</em>. rn这样肯定不行,票椐的尺寸是定制的. rn微软的asp仿佛有用Activex控件来封装报表及<em>打印</em>的功能, rn而jsp目前是否有实现这种要求的可能? rn 说简单点就是能通过web页面<em>打印</em>发票就可以了。rn 急啊!!!!
如何控制richedit的打印?
能提供相关资料更好!
如何控制RichText的打印
使用SelPrint方法后就送到<em>打印</em>机了?可不可以设定纸型?
如何控制打印?
rn 如果一张A4的<em>打印</em>纸我只需用一半,完后就立即停止<em>打印</em>,不让其再走纸,怎么办?
如何控制打印速度
请问<em>如何</em><em>控制</em><em>打印</em>的速度。比如:一个<em>打印</em>任务有多张,当第一张<em>打印</em>完后让它停1秒再打第二张。
如何控制打印区域
例如页面中有一ID为Pr的表格,我要只<em>打印</em>这个表格,要<em>如何</em>写?
如何控制打印效果?
我做報表時,由於資料很多,<em>打印</em>幾頁出來,很難看,末端有的出現半格,另半格跑到第二頁了。rn該<em>如何</em>解決?
打印字体如何控制
我在GridCtrl中设置了字体大小和重量,但是在不同的机子上显示字体大小却不一样。请问那位大侠能帮帮我,非常感谢!rn CGridCtrl *m_pGridCtrlrn GV_ITEM Item,*p0;rn CGridCellBase* ptemp=NULL;rn LOGFONT *lf2=NULL;rn rn Item.mask = GVIF_TEXT|GVIF_FORMAT;rn Item.row = row;rn Item.col = col;rn p0=&Item;rn rn ptemp =m_pGridCtrl->GetCell(p0->row, p0->col);rn lf2=ptemp->GetFont();rn lf2->lfHeight=20; //高度rn lf2->lfWeight=FW_NORMAL ;//重量rn ptemp->SetFont(lf2); //为前两行(FixedRow)设置字体.rnrn但是在我的机子上报表网格上显示的字体恰好容内一个网格,可是同样的程序放到rn其他机子(显示器分辨率设置也一致),但是字体却变大了使得一个网格容内不下。rn请问<em>如何</em>设置字体使得其跟设备无关呢,谢谢!rn
如何控制打印时间 !!
在DELPHI中<em>如何</em><em>控制</em><em>打印</em>机每<em>打印</em>一行等待一段时间?rn 假设在一张100m长的纸上连续不断的<em>打印</em>, rn <em>如何</em><em>控制</em><em>打印</em>机每<em>打印</em>一行(或若干行)就等待0.5秒后就继续<em>打印</em>!rn 好象TPrinter类是在 EndDoc 后才开始<em>打印</em>任务的 ?
如何控制ie的打印
在ie中显示的内容<em>如何</em><em>控制</em>其<em>打印</em>,有没有分页符?
如何控制打印字体?
用TextOut在DC中画字体,在屏幕上一切正常,但在画<em>打印</em>机DC时,字体太小了.rn据说原因是因为<em>打印</em>机的分辨率比屏幕高,所以同样的像素,在<em>打印</em>机中就显得小了.rn但是<em>如何</em><em>控制</em>字体,使之在<em>打印</em>机中也能正常输出呢?rn还有Windows的字体单位,lfHight=-12之类的,这个12是什么单位的数字(居然还有负数???)rn
如何控制fastreport 打印
<em>如何</em>让fastreport在针式<em>打印</em>机Epson 300K下,把要<em>打印</em>的东西<em>打印</em>完毕后,立刻停止走纸,不再把整张A4纸走完。如:<em>打印</em>入库单等。
获取打印份数总为1?
rn在VC6中使用<em>打印</em>对话框rn但使用GetCopies函数获得<em>打印</em><em>份数</em>始终是1rnrnCPrintDialog printdlg(FALSE,PD_ALLPAGES|PD_NOSELECTION,this);rnif (printdlg.DoModal () == IDOK)rnrn nCopies = printdlg.GetCopies ();rnrnrn不知怎么回事?
Word里怎么知道打印份数
我调用Word预览文档,用户可能会点击<em>打印</em>命令(他可能设置<em>打印</em>几份),我<em>如何</em>在程序里面地知道用户<em>打印</em>了几份,Word.Application OR Word.Document中有此属性吗?
用API设置打印机的打印份数
不要告诉我Printer.copies,要用API
如何用Win32API来设置打印份数
不用CPrintDlg,用API<em>如何</em>来设置<em>打印</em>的<em>打印</em><em>份数</em>呢?rn查了下MSDN发觉用GetJob / SetJob 能设置,但是具体不知道怎么实现,有人能帮忙吗?不甚感激~
C# 怎么设置打印机的打印份数呢?
就是设置<em>打印</em>多份!rn我知道有个e.HasMorePages=true;但是不知道怎么用
win98下vsprinter打印份数不可修改的问题
在win2000或xp下,调用vsprinter的<em>打印</em>时,<em>打印</em><em>份数</em>可以修改,rn而在98下,<em>打印</em><em>份数</em>却为灰色不可改,怎样解决?
如何获得打印份数?急求,红包感谢啊
Private Type PRINTER_DEFAULTSrn pDatatype As Stringrn pDevMode As Longrn DesiredAccess As LongrnEnd TypernrnPrivate Declare Function OpenPrinter Lib "winspool.drv" Alias "OpenPrinterA" (ByVal pPrinterName As String, phPrinter As Long, pDefault As PRINTER_DEFAULTS) As LongrnrnPrivate Declare Function ClosePrinter Lib "winspool.drv" (ByVal hPrinter As Long) As LongrnrnPrivate Declare Function EnumJobs Lib "winspool.drv" Alias "EnumJobsA" (ByVal hPrinter As Long, ByVal FirstJob As Long, ByVal NoJobs As Long, ByVal Level As Long, pJob As Byte, ByVal cdBuf As Long, pcbNeeded As Long, pcReturned As Long) As LongrnrnPrivate Type SYSTEMTIMErn wYear As Integerrn wMonth As Integerrn wDayOfWeek As Integerrn wDay As Integerrn wHour As Integerrn wMinute As Integerrn wSecond As Integerrn wMilliseconds As IntegerrnEnd TypernrnPrivate Type JOB_INFO_1rn JobId As Longrn pPrinterName As Longrn pMachineName As Longrn pUserName As Longrn pDocument As Longrn pDatatype As Longrn pStatus As Longrn Status As Longrn Priority As Longrn Position As Longrn TotalPages As Longrn PagesPrinted As Longrn Submitted As SYSTEMTIMErn dmCopies As LongrnEnd TypernrnPrivate Const PRINTER_ACCESS_ADMINISTER = &H4rnrnPrivate Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)rnrnrnPrivate Declare Function FormatMessage Lib "kernel32" Alias "FormatMessageA" (ByVal dwFlags As Long, lpSource As Any, ByVal dwMessageId As Long, ByVal dwLanguageId As Long, ByVal lpBuffer As String, ByVal nSize As Long, Arguments As Long) As LongrnrnPrivate Const FORMAT_MESSAGE_FROM_SYSTEM = &H1000rnrnPrivate Const FORMAT_MESSAGE_IGNORE_INSERTS = &H200rnrnPrivate Sub Command1_Click()rn Dim hPrinter As Longrn Dim RetVal As Longrn Dim pd As PRINTER_DEFAULTSrn Dim lngCount As Longrn rn Dim JI1() As JOB_INFO_1rn Dim aJi1() As Bytern rn Dim dwBytesNeed As Longrn Dim dwBytesRet As Longrn rn Dim lngSize As Longrn Dim JI_1 As JOB_INFO_1rn rn lngSize = Len(JI_1)rn pd.DesiredAccess = PRINTER_ACCESS_ADMINISTERrn RetVal = OpenPrinter(Printer.DeviceName, hPrinter, pd)rn ReDim aJi1(lngSize - 1)rn RetVal = EnumJobs(hPrinter, 0, 3, 1, aJi1(0), lngSize, dwBytesNeed, dwBytesRet)rn rn If RetVal = 0 And dwBytesNeed = 0 Thenrn GetAPIError Err.LastDllErrorrn Exit Subrn End Ifrn rn If dwBytesNeed = 0 Thenrn MsgBox "没有<em>打印</em>任务!", vbInformationrn Exit Subrn End Ifrn rn If dwBytesNeed > lngSize Thenrn ReDim aJi1(dwBytesNeed - 1)rn RetVal = EnumJobs(hPrinter, 0, 3, 1, aJi1(0), dwBytesNeed, dwBytesNeed, dwBytesRet)rn End Ifrn rn ReDim JI1(1 To dwBytesRet)rn List1.Clearrn For lngCount = 1 To dwBytesRetrn Call CopyMemory(JI1(lngCount), aJi1((lngCount - 1) * lngSize), lngSize)rn List1.AddItem "<em>打印</em>任务" & lngCountrn List1.AddItem "JobID:" & JI1(lngCount).JobIdrn List1.AddItem "pPrinterName:" & GetStringFromMem(JI1(lngCount).pPrinterName)rn List1.AddItem "pMachineName:" & GetStringFromMem(JI1(lngCount).pMachineName)rn List1.AddItem "pUserName:" & GetStringFromMem(JI1(lngCount).pUserName)rn List1.AddItem "pDocument:" & GetStringFromMem(JI1(lngCount).pDocument)rn List1.AddItem "pStatus:" & JI1(lngCount).pStatusrn List1.AddItem "Status:" & JI1(lngCount).Statusrn List1.AddItem "Priority:" & JI1(lngCount).Priorityrn List1.AddItem "Position:" & JI1(lngCount).Positionrn List1.AddItem "TotalPages:" & JI1(lngCount).TotalPagesrn List1.AddItem "PagesPrinted:" & JI1(lngCount).PagesPrintedrn List1.AddItem "Year:" & JI1(lngCount).Submitted.wYearrn List1.AddItem "Month:" & JI1(lngCount).Submitted.wMonthrn List1.AddItem "Day:" & JI1(lngCount).Submitted.wDayrn List1.AddItem "DayOfWeek:" & JI1(lngCount).Submitted.wDayOfWeekrn List1.AddItem "Hour:" & JI1(lngCount).Submitted.wHourrn List1.AddItem "Minute:" & JI1(lngCount).Submitted.wMinutern List1.AddItem "Second:" & JI1(lngCount).Submitted.wSecondrn List1.AddItem "wMilliseconds:" & JI1(lngCount).Submitted.wMillisecondsrn List1.AddItem "copyies:" & Printer.Copiesrn Nextrn ClosePrinter (hPrinter)rnEnd SubrnrnPublic Function GetAPIError(ByVal API_ERROR As Long)rn Dim Lret As Longrn Dim M_Msg As Stringrn M_Msg = String(256, " ")rn Lret = FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM Or FORMAT_MESSAGE_IGNORE_INSERTS, 0&, API_ERROR, 0&, M_Msg, Len(M_Msg), 0&)rn If Lret <> 0 Thenrn M_Msg = Trim(M_Msg)rn MsgBox M_Msg, , "API错误信息"rn End IfrnEnd Functionrnrn'从给定的内存地址中获得字符串rnPrivate Function GetStringFromMem(ByVal Addr As Long) As Stringrn Dim lngSize As Longrn Dim bytStr() As Bytern Dim lngX As Longrn rn '获得字符串的长度rn Call CopyMemory(lngSize, ByVal Addr - 4, 4)rn ReDim bytStr(lngSize / 2)rn Call CopyMemory(bytStr(0), ByVal Addr, lngSize / 2 + 1)rn GetStringFromMem = StrConv(bytStr, vbUnicode)rnEnd Functionrnrnrn
API 钩子没得到WORD的打印份数如何解决!
声明: 如果分不够,我再开贴发rnrnrnrn我钩遍了 winspool.drv里面的所有<em>打印</em>相关的函数rn还有gdi32.dll里面相关的函数rn都没有得到 在word中,正确的<em>打印</em><em>份数</em>rnrn其它的应用程序里,都可以得到rnrn而word 中却始终是 1份rnrn而且,当我在word中<em>打印</em>文档的时候rn在<em>打印</em>管理器中,看<em>打印</em>任务的属性中<em>打印</em><em>份数</em>也是1份rnrn但 <em>打印</em>机却 能够<em>打印</em>出正确的<em>份数</em>rnrn
请教,如何取得Microsot Word的打印作业中的份数?
在截获<em>打印</em>作业时,其它的程序产生的<em>打印</em>作业取得的数据包括页数,<em>份数</em>,都是正确的rn但是,Word产生的<em>打印</em>作业,无论是<em>打印</em>多少份,其<em>份数</em>都为1rnrn怎样取得Word的真正的<em>打印</em><em>份数</em>?
VC 6.0 演示如何获取打印份数.rar
VC 6.0 演示<em>如何</em>获取<em>打印</em><em>份数</em>,这个功能在平时的<em>打印</em>操作中,几乎每次都要设置一下,要不然<em>打印</em>机按<em>打印</em>一份处理,本程序可设置<em>打印</em><em>份数</em>,将参数传递给<em>打印</em>机,一次可<em>打印</em>多份文档,代码超简单,有兴趣下载源码学习。
如何调出打印设置对话框,可以选择打印页数和份数的那个。
<em>如何</em>调出<em>打印</em>设置对话框,可以选择<em>打印</em>页数和<em>份数</em>的那个。
动态指定双面打印打印份数,我这样做对不对?
1.设定双面<em>打印</em>,我是这样做的:rn在OnPreparePrinting中,取得用户所选择的<em>打印</em>机的名称,用GetPrinter取得DEVMODE,然后用以下rn代码进行设定:rnif(pDevMode->dmFields & DM_DUPLEX)rnrn pDevMode->dmFields |= DM_DUPLEX;rn pDevMode->dmDuplex = DMDUP_HORIZONTAL;rnrnrn2.设定<em>打印</em><em>份数</em>:我发现有两个地方可以指定,一个是DEVMODE的dmCopies成员,一个是CPrintInfo::m_pPD的nCopies成员,究竟该设定哪一个呢?rnrn3.设定了<em>打印</em><em>份数</em>后,是否MFC会重复两次调用OnPrint,而无需我自己去根据<em>打印</em><em>份数</em>分多次重复调用OnPrint?
MFC 不显示打印对话框,设置打印份数
MFC 中 OnPreparePrinting(CPrintInfo* pInfo) 中 设置不弹出<em>打印</em>对话框,怎么设置<em>打印</em>的<em>份数</em>呢?
vfp 控制office
我只是文件的制作者,不是内容的编者、作者。 希望各位前辈、高手为我们提供更多的教材! 特别感谢“电子书库”的作者——邹建峰 的大力支持! “电子书库”网站:http://www.mycnknow.com/estackroomcn.htm “电子书库”论坛:有各种电子书下载 欢迎到 梅子论坛 沧海笑 chinaxianyun@21cn.com
vfp 控制 excel
<em>vfp</em> <em>控制</em> excel,是vfoxpro编程可以用的
VFP控制EXCEL
VFP<em>控制</em>EXCEL rnrn现在的EXCEL中,打开sheet1,全选,然后点ctrl+C(复制),然后,不是简单的粘贴,而是进行选择性粘贴.(右键-选择性粘贴-数值-确定) rnrn这样做的目的是:将单元格中的公式删除了,而只保留数值. rnrn<em>如何</em>弄的?rnrnrn刚才的回复是:rnrnSelection.PasteSpecial(-4104,-4142,.F.,.F.) rn*选择性粘贴4参数 rn*第一个参数:指定要粘贴该区域的哪一部分 rn*-4104(全部), -4123, -4163,-4122, 7 rn*第二个参数:粘贴的操作 rn*-4142,2,3,4,5 rn*第三个参数:若指定为 True,则不粘贴剪贴板中单元格区域的空白单元格。默认值为 False。 rn*第四个参数:若指定为 True,则粘贴时转置行和列。默认值为 False。 rnrn我使用了Selection.PasteSpecial(-4104,-4142,.F.,.F.) 此命令后,没有实现"只删除公式,停留数据"的选择性粘贴的目标.
VFP控制EXCEL命令
VFP<em>控制</em>EXCEL命令rnrn将激活的sheet进行全选( ctrl+A ), 是什么命令的?
vfp控制word
我已经通过程序新建了一个word工作表,rnOleApp:=CREATEOBJECT("word.Application")rn Application.Visible=.T.rn OleApp.documents.Add()rn成功后,工作表是空的,我怎样在工作表中插入一些文字,或者一个表格,然后再表格里插入rn一些东西呢?rn
VFP的webbrowser控件控制网页
[url=http://www.sgict.com.cn/gdweb/queryinclude/com.jsp][/url]rnrn这个网址上有的“提单号:”我想利用webbrowser自动在提单号里输入字符,比如1234567 然后自动点击后面的查询按钮,rn怎么也没反应。rn 我写的是:a=thisform.webbrowser.document.getelementsbyname("billno",[0])rn a.value=1234567rn b=thisform.webbrowser.document.getelementsbyname("submit22")rn b.clickrnrn我觉得没有写错,可就是不行
VFP控制EXCEL的问题
<em>如何</em>在通过VFP中EXCEL进行如下设置:rn1 设置允许用户编辑区域rn 通过宏录制生成的代码如下:rn ActiveSheet.Protection.AllowEditRanges.Add Title:="区域2", Range:=Cellsrnrnrn2 保护工作簿rnrn 通过宏录制生成的代码如下:rn ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True _rn , AllowFormattingCells:=True, AllowFormattingColumns:=True, _rn AllowFormattingRows:=Truernrn3 设置保护工作簿的密码rnrn上述VBA代码<em>如何</em>在VFP中实现!!!rn谢谢!!!!!rnrnrn
VFP全面控制EXCEL
工作中都用得到的,非常方便快捷的,希望大家都好好看看
VFP的打印问题???
我想在VFP报表中<em>打印</em>,每页纸10条记录,怎么在命令窗口环境下实现???并且每页纸都有一个题头。
关于VFP打印的问题????
我用VFP报表设好了报表格式,但是在<em>打印</em>时每次都要打整个格式打完(不管是否已到记录尾)rn现在我想当到记录时停止<em>打印</em>,要怎么办rnrn是不是要在报表中的<em>打印</em>条件设置,要怎么设置??rn谢谢
程序员第二步——从程序员到项目经理下载
这本书是写给程序员和项目经理的。作者结合自身的丰富成长历程,通俗易懂地讲述了一名程序员如何才能成为一名优秀的项目经理。内容涉及职业规划、学习方法、自我修炼、团队建设、项目管理等,书中理清了项目管理领域中典型的误区及具有迷惑性的观点,并对项目中的难点问题提出了针对性的解决方法。 全书行文流畅,严谨中带着活泼,理智中透着情感,给读者带来轻松愉快的阅读感受。书中诸多富有创见的观点,让人耳目一新,引导读者以不同的视角来看待工作、生活,审视自己,在诙谐幽默中共鸣,在低头沉思中理解,在会心一笑中顿悟。 相关下载链接:[url=//download.csdn.net/download/turingbooks/6555351?utm_source=bbsseo]//download.csdn.net/download/turingbooks/6555351?utm_source=bbsseo[/url]
CCNA2英文版国际信息学院下载
这是Supinfo国际信息学院的CCNA认证课件,非常实用,英文版的。 相关下载链接:[url=//download.csdn.net/download/tg8998/2258363?utm_source=bbsseo]//download.csdn.net/download/tg8998/2258363?utm_source=bbsseo[/url]
VC6.0中实现n皇后图形界面下载
数据结构 课程设计 VC6.0中实现n皇后图形界面 相关下载链接:[url=//download.csdn.net/download/y893569370/2981499?utm_source=bbsseo]//download.csdn.net/download/y893569370/2981499?utm_source=bbsseo[/url]
相关热词 c#串口测试应用程序 c# 匹配 正则表达式 c#防止窗体重绘 c#读写txt文件 c#挖地雷源代码 c#弹框选项 c# 移除 队列 c# 密码写入配置文件 c# 获取可用内存大小 c# 嵌入excel编辑
我们是很有底线的