请教如何使用Delphi 7 语言生成、打印二维码?谢谢高手 [问题点数:50分]

Bbs1
本版专家分:0
结帖率 33.33%
Bbs6
本版专家分:6097
Bbs5
本版专家分:3283
Blank
黄花 2015年10月 MS-SQL Server大版内专家分月排行榜第二
2015年8月 其他数据库开发大版内专家分月排行榜第二
2015年7月 其他数据库开发大版内专家分月排行榜第二
Blank
蓝花 2015年9月 其他数据库开发大版内专家分月排行榜第三
2015年7月 MS-SQL Server大版内专家分月排行榜第三
2015年6月 其他数据库开发大版内专家分月排行榜第三
Bbs9
本版专家分:50585
Blank
红花 2018年11月 Delphi大版内专家分月排行榜第一
2018年5月 Delphi大版内专家分月排行榜第一
2018年2月 Delphi大版内专家分月排行榜第一
2018年1月 Delphi大版内专家分月排行榜第一
2017年12月 Delphi大版内专家分月排行榜第一
2017年8月 Delphi大版内专家分月排行榜第一
2017年7月 Delphi大版内专家分月排行榜第一
2017年5月 Delphi大版内专家分月排行榜第一
2017年3月 Delphi大版内专家分月排行榜第一
2017年2月 Delphi大版内专家分月排行榜第一
2016年12月 Delphi大版内专家分月排行榜第一
2016年11月 Delphi大版内专家分月排行榜第一
2016年10月 Delphi大版内专家分月排行榜第一
2016年9月 Delphi大版内专家分月排行榜第一
2016年8月 Delphi大版内专家分月排行榜第一
2016年7月 Delphi大版内专家分月排行榜第一
2016年6月 Delphi大版内专家分月排行榜第一
2016年5月 Delphi大版内专家分月排行榜第一
2016年4月 Delphi大版内专家分月排行榜第一
2016年3月 Delphi大版内专家分月排行榜第一
2016年2月 Delphi大版内专家分月排行榜第一
2016年1月 Delphi大版内专家分月排行榜第一
2015年12月 Delphi大版内专家分月排行榜第一
2015年11月 Delphi大版内专家分月排行榜第一
2015年10月 Delphi大版内专家分月排行榜第一
2015年9月 Delphi大版内专家分月排行榜第一
2015年8月 Delphi大版内专家分月排行榜第一
2015年7月 Delphi大版内专家分月排行榜第一
2015年6月 Delphi大版内专家分月排行榜第一
2015年5月 Delphi大版内专家分月排行榜第一
2015年4月 Delphi大版内专家分月排行榜第一
2015年3月 Delphi大版内专家分月排行榜第一
2015年2月 Delphi大版内专家分月排行榜第一
2015年1月 Delphi大版内专家分月排行榜第一
2014年12月 Delphi大版内专家分月排行榜第一
2014年11月 Delphi大版内专家分月排行榜第一
Blank
黄花 2017年11月 Delphi大版内专家分月排行榜第二
2017年4月 Delphi大版内专家分月排行榜第二
2017年1月 Delphi大版内专家分月排行榜第二
2014年10月 Delphi大版内专家分月排行榜第二
2014年9月 Delphi大版内专家分月排行榜第二
Bbs1
本版专家分:0
delphi fastreport4 打印二维码 条形码
<em>二维码</em>生成 fastreport应用
使用delphi语言生成的dll
通过<em>delphi</em>生成的dll,其中一个方法返回一个single类型的数组。再通过JNA<em>使用</em>。但是在编写dll时,不知道怎么返回数组,网上的资源也不够详细。如果<em>使用</em>结构体,在java IDE上会报错,不支持的类型。之前没有学习过<em>delphi</em>,希望大家帮助一下。[code=<em>delphi</em>]usesrn System.SysUtils,rn System.Classes;rnrn$R *.resrntypern TArr2 = array[0..3] of single;rn PArr2 = ^TArr2;rnFunction MyFunc(s:single):array[0..3] of single;rn var arr:array[0..3] of single;rnbeginrn//new(arr);rn arr[0]:=s;rn arr[1]:=s;rn arr[2]:=s;rn arr[3]:=s;rn Result:= arr;rn// dispose(arr);rnend;rnexportsrn MyFunc;rnbeginrnend.[/code]
C语言生成二维码驱动
本<em>二维码</em>驱动<em>使用</em>方法见http://blog.csdn.net/qq_21475601/article/details/71480028
请教Delphi打印高手。。
是关于DevMOde结构与printer对象属性: rn如下代码:rn var curOrientation: integer;rnrn cbPrinters.items.assign(Printer.Printers);rnrn Printer.PrinterIndex:=Printer.PrinterIndex;rn Printer.GetPrinter(Device, Driver, Port, DMode);rn if hDMode <> 0 thenrn beginrn pDMode := GlobalLock(hDMode);rn if pDMode <> nil thenrn beginrn curOrientation:=pDMode^.dmOrientation;rn GlobalUnlock(hDMode);rn end;rn rn showMessage(inttostr(curOrientation)); // =1rn showMessage(intTostr(integer(Printer.orientation))); // =0rnrn发现 dmOrientation 与 Printer.orientation的值不同。 这两个值不是当有<em>打印</em>机的<em>打印</em>方向值吗?rn我的目的是: 自定义一个<em>打印</em>设置对话框,用当前所选的<em>打印</em>机的<em>打印</em>方向值填充窗体,请问各位朋友应<em>如何</em>做???rnrnrn
delphi:斑马打印机ZPL指令打印中文及二维码,补充说明
由于个人水平有限,修正一下上一篇文章中的一些错误和改进 一、图片对齐的方法,最简单的莫过于下面这种了     newWidth = (bmp.width +7) div 8; 用这条语句可以保持图片没对齐的数据完整性 二、qrcode的对齐方法,经仔细研究,发现可以<em>使用</em>FT的相对布局指令来调整位置,完全不受限制 三、提高<em>打印</em>效率的方法:         如果条码上面很多中文,生成的ZP
打印二维码命令
前言 正确的ESC指令下QRCode<em>打印</em>流程为四步: 1、设定QRCode大小;(可以省略) 2、设定纠错等级;(一般无需设定,忽略) 3、将QRCode对应的文字信息存入<em>打印</em>机缓存中;(必须要有) 4、发送<em>打印</em>QRCode命令。 一共有四个命令对应上述四步。 I、 设置大小 [command addQRCodeSizewithpL:(content.length+3) withp...
二维码打印程序(BarTender 7.10)
装好BarTender7.10 可直接<em>使用</em>,代码未封装,嗯,就这样了
Delphi 实现二维码打印
<em>delphi</em>中,实现Fastreport<em>二维码</em><em>打印</em>功能
delphi 二维码形成并打印
<em>delphi</em> <em>二维码</em>形成并<em>打印</em>,源代码。
delphi 打印二维码
PDF417码有长度短,破损都可以扫描等优点.最近做项目需要用到<em>二维码</em>PDF417码,<em>使用</em>rb报表直接<em>打印</em>,不显示预览框.找了很久,这些资料都比较难找到.现在共享给位,希望有所帮助.<em>delphi</em>7,rbserver7下调试成功.
C#如何打印二维码
c#<em>如何</em><em>打印</em><em>二维码</em>,用到什么dll,最好有简单清晰的源码,<em>谢谢</em>诶!
如何使用java调用bartender打印二维码
<em>使用</em>就JAVA代码去调用bartender<em>打印</em>一个<em>二维码</em>,代码应该怎么写,是不是生成一个批处理文件在调用呢
delphi 7打印不了的问题
程序代码:rnprocedure TForm1.Button2Click(Sender: TObject);rnrnbeginrnif PrintDialog1.Execute thenrn beginrn Printer.BeginDoc;rn printer.Canvas.rectangle(0,0,100,100);rn Printer.EndDoc;rn end;rnend;rnend.rn编译能通过 可是按了按钮后选者<em>打印</em>机却出现<em>打印</em>到文件的输入框,给输入框输入名字后却不是<em>打印</em>而是在程序的文件夹下面生成一个什么软件都不能打开的文件,郁闷,Printer.BeginDoc;这句好象是引起的,我电脑的环境是WINDOW XP +DELPHI 7.0
使用C语言生成bitmap
C语言 bitmap 画图
请教delphi高手,关于打印的问题。
各位<em>高手</em>,我分不多,请多多包涵!rn我想把<em>打印</em>服务器上的<em>打印</em>历史记录保存下来。
delphi 7 使用问题
打开工程文件时,弹出一个出错窗口,显示“Access violation at address 00509370 in module 'coreide70.bpl'.Read of address 00000008. ”。我重装了好几次<em>delphi</em> 7 还是不行,请问这是怎么回事?
请教高手.....,好象跟我的delphi打印有关
程序报错,Exception Eprint in module Project1.exe at 0002E3E2 Printer selected is not valid;在别人的机子上运行的好好的。是不是Delphi那里设置的有问题。操作系统win2k。
Java使用Zxing打印二维码
Java<em>使用</em>Zxing<em>打印</em><em>二维码</em>,zxing2.0架包,完整的一个例子...
C#使用DataMatrix.net打印二维码
---------<em>使用</em>DataMatrix.net库进行标签<em>打印</em>的示例代码
打印二维码
rbserver Delphi<em>打印</em><em>二维码</em>,PDF417码有长度短,破损都可以扫描等优点.最近做项目需要用到<em>二维码</em>PDF417码,<em>使用</em>rb报表直接<em>打印</em>,不显示预览框.找了很久,这些资料都比较难找到.在<em>delphi</em>7,rbserver7下调试成功。
二维码打印
配置内容 连接<em>打印</em>机 <em>打印</em><em>二维码</em>
水晶报表打印问题,请教高手谢谢
我在水晶报表设计时设定了横打,为什么<em>打印</em>的时候,还要重新设置<em>打印</em>横打?
请教delphi打印问题?
我公司的办公自动化系统是用<em>delphi</em>3编的,我编译了之后,在xp和2000下可以<em>打印</em>,但是在98下无法实现<em>打印</em>功能,不知到为什么,是不是需要补丁啊,
delphi控制标签机打印一维码、二维码
求编码规则rnrn如1E12022,<em>打印</em>一维码rnrn
Delphi二维码、分组、批量打印经验小结
Delphi<em>二维码</em>中文支持、分组、批量<em>打印</em>经验小结rnFastReport设计入库单报表实例rnrnDelphi <em>二维码</em> 分组批量<em>打印</em> fastreport 控件rnrn背景:rn一直也没接触到什么复杂的报表,都是一些简单的报表,在DelphI下<em>使用</em>QuickReport一般也就能满足需要了,由于公司现在需求的变化,对条码扫描提出了新的要求,主要是扫码要包含更多地内容,以前的一维码显然不能完全满足,再说<em>二维码</em>也是一种趋势,故而需要解决<em>二维码</em>的问题,网上搜了一下,方式有多种多样,我花了3天时间找了很多,也尝试了很多。也经历了很多失败!总结一下在Delphi下实现<em>二维码</em>主要有三种方法:rn1、<em>使用</em>PtImageRW.dll和PtQREncode.dll动态连接库,<em>使用</em>uQRCode生成<em>二维码</em>图像,如此就可以在报表中予以<em>打印</em>了,具体<em>如何</em>用uQRCode实现绘制<em>二维码</em>,本人水平太低,无法参透;结合QuikReport就可以实现<em>打印</em><em>二维码</em>了,但此种有一个问题就是不支持中文,如source1(整合到FastReport中也无法实现对中文的支持);rn2、还有一种就是生成控件,利用ZINT制作的控件,如source2;此种有个问题就是无法在报表中<em>使用</em>(也许是我不会用),只可在窗体上显示,当然理论上说能在窗体上<em>使用</em>就完全可以用于<em>打印</em>报表了,可问题时我不会,哎,还是技术水平太低。还有一种叫Han-sof 2D Barcodes的控件,我可以安装,但却无法<em>使用</em>,无法生成<em>二维码</em>到图片。可上网搜索一下下载这个控件安装一下,有搞定的与我共享一下。rn3、用ZINT整合到FastReport中,也是下面我要叙述的形式:source3。完全可以满足我的需求。rnrn例子实现了对采购入库数据的分组批量<em>打印</em>,加入了<em>二维码</em>的<em>使用</em>,当然实际工作当中制作入库单基本上用不到批量<em>打印</em>的,一般都是一单一打,但在我这里没办法,必须设计这样的功能,历史遗留问题吧,这里也牢骚一下吧!rn如做一些延伸,很多的<em>打印</em>都和这个有很多的类似之处,我说的是并不太复杂的应用,至于什么更复杂得我想FS也能搞的定,这里做一个总结是希望对和我一样水平的人提供一些帮助吧,也许现在很多人根本不用Delphi了,权且当作自己的一个笔记吧!rn入库单样式如下:rn [img=https://img-bbs.csdn.net/upload/201508/04/1438658838_967736.png][/img]rn [img=https://img-bbs.csdn.net/upload/201508/04/1438658939_850080.png][/img]rnrn一、环境及所用组件程序rn1、Delphi2010rn2、FastReport4.9 for 2010rn3、zint.dllrn4、frx2DBarcode.pasrn5、frx2DBarcodeRTTI.pasrn6、uBitMapOverriden.pasrn7、ufrxZintBarcode.pasrn8、uRegZintBarcode.pasrn9、uZintInterface.pasrnrn二、安装FastReport4.9 for 2010rn注意:安装有一定要新建一个工程,并放置一个frxReport1控件,看看是否可以正常运行,如果不能正常运行,那么到安装目录检查一下权限,将EVERYONE添加到文件夹权限,应该就可以了,我的就是这样。一定要确保frxReport可以正常运行,否则一切都是白搭。rn在2010下安装,直接下一步到底就可以了,并不需要重新编译;rnFastreport5在安装的时候无法生成相应版本的文件进行编译,不知道是何原因。rnrn三、zint.dll与相关文件rn1、将Zint.dll复制到工程文件的当前目录及windows的system32目录下;不过好像不复制在当前目录页不要紧,谨慎起见还是放一个吧!rn2、在单元文件中引用frx2DBarcode,即可调用<em>二维码</em>;我参考网上的例子,多引用了很多,具体如下,具体什么意思,也没有细细研究。反正多几个也没坏处frxDesgn, frxClass, frxDCtrl, frxChart,frxDBSet, frxRich, frxBarcode,frxOLE, frxCross, frxDMPExport, frxExportImage, frxExportRTF, frxExportXML, frxExportXLS, frxExportHTML, frxGZip, frxExportPDF, frxChBox, frxExportText, frxExportCSV, frxExportMail, frxADOComponents, frxCrypt, frxExportODF, frxGradient,frx2DBarcode;rn3、窗体中加入以下控件。rn [img=https://img-bbs.csdn.net/upload/201508/04/1438658963_586715.png][/img]rnrn属性设置参考例程rn4、打开设计rnprocedure TMain_Form.RzBitBtn1Click(Sender: TObject);rnbeginrnfrxReport1.DesignReport;rnend;rn5、打开预览rnfrxReport1.Clear;rnfrxReport1.LoadFromFile('group.fr3');rnfrxReport1.DataSets.Clear;rnfrxReport1.DataSets.Add(frxDBData);rnfrxReport1.ShowReport;rnfrxReport1.Modified:=false;rn6、设置ADOquery1的SQL为“select * from data_in order by bill_code_in desc”;再设置Active为True;rn7、设置frxDBData的DataSet为ADOQuery1;右击控件可以打开Edit aliases对话框,如此在设计其中就可以<em>使用</em>数据源了。当然在设计中也可自己设定。rn[img=https://img-bbs.csdn.net/upload/201508/04/1438658990_545399.png][/img] rnUserName就是在FastReport下课见的数据连接名。rn四、设计报表rn注意:此种用法只能在运行程序文件时才能设计报表,否则直接Delphi环境下的控件是无法显示含有<em>二维码</em>的设计页面的。rn [img=https://img-bbs.csdn.net/upload/201508/04/1438659015_174337.png][/img]rn运行程序,单击设计即可打开“设计”界面;rn[img=https://img-bbs.csdn.net/upload/201508/04/1438659041_26270.png][/img] rn1、双击页面可以打开此对话框,选择Large height in design mode可以最大限度显示设计的的幅面,不选择此项目,添加几个Band后你就会发现有的Band就找不到了!rn [img=https://img-bbs.csdn.net/upload/201508/04/1438659053_768623.png][/img]rn2、在FASTREPORTX下用到的控件及布局区域;rn [img=https://img-bbs.csdn.net/upload/201508/04/1438659071_54886.png][/img]rn3、page设计模式,主要用到Header、GroupHeader、MasterData、GroupFooter、PageFooterrn [img=https://img-bbs.csdn.net/upload/201508/04/1438659083_761718.png][/img]rn4、添加完MasterData后,双击该BAND,如下图选择,之后再MasterData的右上角出现frxDB,表示数据选择成功rn [img=https://img-bbs.csdn.net/upload/201508/04/1438659095_539580.png][/img]rnrn5、双击GroupHeader,选择bill_code_in作为筛选条件;Options如下,之后右上角显示frxDB.”bill_code_in”:rn [img=https://img-bbs.csdn.net/upload/201508/04/1438659103_941696.png][/img]rn6、在各Band添加数据,直接将右边的字段拖入相应区域即可,从这一点来看还是有优势的。rn [img=https://img-bbs.csdn.net/upload/201508/04/1438659119_49416.png][/img]rnrn五、注意事项rn(1)页脚以[img=https://img-bbs.csdn.net/upload/201508/04/1438659129_443688.png][/img] 形式显示,必须选择Report的DoublePass属性为True,否则显示总页数位0,记得插入那个不带#好的page和totalpage,带#好的事表示全部,试一下就知道什么意思了。rn [img=https://img-bbs.csdn.net/upload/201508/04/1438659155_259599.png][/img]rn(2)如果需要在每页都显示Header,则在设计时选择ReprintOnNewPage为Truern [img=https://img-bbs.csdn.net/upload/201508/04/1438659168_535891.png][/img]rn(3)在<em>使用</em>到frx2DBarcode.pas文件时可能出现无法加载,即便已在USE里做了引用,因此最好的办法就是直接加入到项目里来。Add to projectrn [img=https://img-bbs.csdn.net/upload/201508/04/1438659204_945532.png][/img]rn(4)在Delphi下<em>如何</em>改变FastReport的控件属性。rnTfrxMemoView(frxReport1.FindObject('memo16')).Text:=’设定的内容’rn(5)<em>二维码</em>大小调整rn<em>二维码</em>大小调整可以在设计模式下设置参数AutoSizeZoom改变,也就是放大的比例;但这样容易出现一个在你批量<em>打印</em>的时候滚动鼠标你会发现<em>二维码</em>底部会少一小部分,也就无法扫描了,不知道<em>打印</em>是否有影响。rn[img=https://img-bbs.csdn.net/upload/201508/04/1438659233_570979.png][/img] rn我是通过设置代码来完成,我觉得这样更方便一下,也不会出现上面的情况。rn [img=https://img-bbs.csdn.net/upload/201508/04/1438659249_302985.png][/img]rnrn备注:rn1、fastreport for 2010是我用的,可以正常<em>使用</em>也是例子里用到的4.9版本rn2、fastreport5 for <em>delphi</em>7,已经好久不用7了,故也没测试,这是下载到的!测试成功的告诉我一下!rn3、fastreport5 for xe8,我朋友测试通过的,也是他发给我的,但在我的xe8下就是不行,可以看到控件,但一运行,就报错,还没时间研 究,我记得在装XE8的时候是自带了fastreport5的,但并没有<em>二维码</em>的选项,我是卸载了自带的,然后再安装的,然后出现了一系列的问题,实在没时间,因为大部分程序是在2010下的,还没时间向XE8切换,不知道是不在安装的时候不能安装自带的FS5,我朋友在第一次安装的时候就没有选择,然后手动安装的,效果很好!rn有知道fastreport5<em>如何</em>在2010下用的,麻烦指教一下!rn4、source1-3,前面有说过了,主要是一些例子,我所总结的三种方法,也不知道对不对!rn5、zinBarcode文件里也是一个例子,也是用fastreport,可以比较完美的显示中文fastreport,但<em>二维码</em>不能显示中文,设置成中文即报错。rnrn感觉FastReport的功能实在是太强大了,但好多功能还不太会用,以后愿意与大家多交流这方面的信息!rn联系方式:jacdfb@163.com;qq:505689211rn[img=https://img-bbs.csdn.net/upload/201508/04/1438659271_857792.png][/img]rnrnhttp://download.csdn.net/detail/daifubing/8957447rn
如何打印如何打印如何打印谢谢
.要对网页进行<em>打印</em>,<em>如何</em>才能取得IE浏览器自带的<em>打印</em>控件中的页面设置参数,如纸张尺寸,<em>打印</em>方向等? rn又<em>如何</em>通过程序修改这些参数。 rn2.ScriptX.cab有没有真正免费的终生<em>使用</em>无限制安装的破解版?有没有其他的免费控件,不带广告或水印的 rn3.VC++开发一个ACTIVEX控件需要net formwork 运行环境吗? rn4.WEB<em>打印</em><em>如何</em>才能做到自动分页。而不是强制分页? rn5.合位的解决方式是什么?
请教高手如何做WebForm及WinForm同时使用打印模块?谢谢!
供WebForm及WinForm同时<em>使用</em>的的<em>打印</em>模块?rn 我公司想开发一个<em>打印</em>信封的模块供各种程序调用,我的设想如下rn 将<em>打印</em>信封的格式数据放在XML文件中,控制<em>打印</em>的程序放在DLL中?rn WebForm<em>使用</em>是传递网络<em>打印</em>机名称,<em>打印</em>的具体内容。rn WinFrom<em>使用</em>是传递网络<em>打印</em>机名称,<em>打印</em>的具体内容。rn <em>打印</em>类封装在System.Drawing.Printing.PrintDocument类中,rn 但调用ASP.NET调用 pd.Print()时现Win32Exception (0x80004005): RPC 服务器不可用rn 我想是不是PrintDocument是专为WindForm准备的,如果,请问还有什么方法可将<em>打印</em>模块封装,供rn WindForm和WebForm共用?rn<em>谢谢</em>
如何批量打印二维码
用c#生成了一批<em>二维码</em>图,<em>如何</em>批量从条码<em>打印</em>机上连续<em>打印</em>出来?rn
使用delphi控制标签机(打印一维码、二维码、数字、文字)
procedure T3CBOX_Barcode.Barcode_PEGATRON(Comm: TComPort; BoxNO,rn CustPn, DateCode, QTY: string);rnvar pbuf:String;rnbeginrn Comm.Open;rn Pbuf:= #2+'L'+cr + 'D11'+cr + 'H18'+ cr;rn Comm.Write(Pbuf[1],length(Pbuf));rnrn Pbuf:=''+''+'' ; // 角度 高 水平 rn Pbuf :=Pbuf + '1X11000' + '0005' + '0045' + 'L260001' + cr; //水平rn Pbuf :=Pbuf + '1311001' + '0020' + '0055' + 'Note:' + cr;rn Pbuf :=Pbuf + '1X11000' + '0045' + '0045' + 'L260001' + cr;rn Pbuf :=Pbuf + '1311001' + '0055' + '0055' + 'QTY:' + cr;rn Pbuf :=Pbuf + '1E11020' + '0055' + '0150' + QTY + cr; //一维码rn Pbuf :=Pbuf + '1X11000' + '0085' + '0045' + 'L260001' + cr;rn Pbuf :=Pbuf + '1311001' + '0095' + '0055' + 'BatchNo:'+ cr;rn Pbuf :=Pbuf + '1X11000' + '0125' + '0045' + 'L260001' + cr;rn Pbuf :=Pbuf + '1311001' + '0135' + '0055' + 'DateCode:'+ cr;rn Pbuf :=Pbuf + '1E11020' + '0135' + '0150' + DateCode + cr;rn Pbuf :=Pbuf + '1X11000' + '0165' + '0045' + 'L260001' + cr;rn Pbuf :=Pbuf + '1311001' + '0175' + '0055' + 'Vendor P/N:'+ cr;rn Pbuf :=Pbuf + '1311001' + '0175' + '0150' + Copy(BoxNo,9,9)+ cr;rn Pbuf :=Pbuf + '1X11000' + '0205' + '0045' + 'L260001' + cr;rn Pbuf :=Pbuf + '1311001' + '0215' + '0055' + 'Pega P/N:'+ cr;rn Pbuf :=Pbuf + '1E11020' + '0215' + '0150' + CustPn + cr;rn Pbuf :=Pbuf + '1X11000' + '0245' + '0045' + 'L260001' + cr;rn Pbuf :=Pbuf + '1311001' + '0255' + '0055' + 'Vendor SMP'+ cr;rn Pbuf :=Pbuf + '1E11020' + '0255' + '0150' + BoxNO + cr;rn Pbuf :=Pbuf + '1X11000' + '0285' + '0045' + 'L260001' + cr;rn Pbuf :=Pbuf + '1911005' + '0295' + '0055' + 'PEGATRON Unihan PI 965'+ cr;rn Pbuf :=Pbuf + '1X11000' + '0325' + '0045' + 'L260001' + cr;rn Pbuf :=Pbuf + '1X11001' + '0005' + '0045' + 'L001320' + cr; //rn Pbuf :=Pbuf + '1X11001' + '0005' + '0305' + 'L001320' + cr;rn Pbuf :=Pbuf + 'Q0001' + cr;rn Pbuf :=Pbuf + 'C00' + cr;rn Pbuf :=Pbuf + 'E' + cr;rn Comm.Write(Pbuf[1],Length(Pbuf));rn Comm.Close;rnend;
delphi二维码
针对<em>delphi</em>生成<em>二维码</em>,经测试,可以<em>使用</em>,基础<em>使用</em>已经足够,细节需要自己研究
在DELPHI 7 中如何使用"TDBChart"?
rn 各位朋友,大家好.rnrnrn 我现在想<em>使用</em>"TDBChart"把ACCESS中的数据以统计图形的样式比较直观的显示出来.rnrn ACCESS的目录"D:\WATER\数据库.mdb"rnrnrn 统计图形"饼型图、柱状图、线条型“三种。rnrn 具体步骤是什么?rnrnrn <em>谢谢</em>了。
delphi 7 的socket问题请教
客户端通过socket发送一个图片给服务器端,服务器端判断是否接收完毕时,判断如果接收完毕后,就调用另一个函数处理图片,请问在判断图片接收完毕这里,怎么写调用另一个函数呢,我现在在socketread 里面,在判断接收完毕语句后面加上处理图片的函数,出现二种情况,一种同一张图片接收,由于需要多次接收才接收完毕,从而调用多次图片处理函数,另一种情况就是接收不正常,rn请问该怎么写才对呢,我只需要调用一次处理函数,调用多次就会出错。
Delphi 7高手进来看看
<em>请教</em>一下<em>如何</em>用DELPHI实现进程互斥?
请教 C 语言生成环境变量的问题
我用putenv()生成环境变量,rn但是它是临时的,只要重新开机就没了。rn请问我该怎么弄才能实现把环境变量加到rn“我的电脑”->"属性"->“高级”->“环境变量”rn只有加到这里,重新开机环境变量还在。
请教delphi问题,,谢谢
rn1。 <em>delphi</em>中数据库提示框:用户名sysdba,密码masterkey怎样才能不输入而正常执行程序rn2。 执行程序时说已经超过最大用户数怎么办rn
Delphi 使用CODESOFT打印
rn// BarApp := GetActiveOleObject('lppx.Application');rn BarApp := CreateOleObject('lppx.Application');rn BarApp.Visible:=False;rn BarDoc:=BarApp.ActiveDocument;rn BarVars:=BarDoc.Variables;rn BarDoc.Open(vDSNFile);rn BarDoc.Variables.Item('Var0').Value := ‘123456’;rn Bardoc.Printlabel(1);rn BarDoc.FormFeed;rn Bardoc.Close;rn BarApp.Quit;rnrn上面是<em>打印</em>的代码,现在<em>使用</em>CreateOleObject('lppx.Application')就会提示“文件名、目录名或者卷标语法错误",而当把CODESOFT软件打开以后,<em>使用</em>GetActiveOleObject('lppx.Application')则可以正常<em>打印</em>,还请各位指点迷境。
用DELPHI语言在datamax打印机上打印二维码怎么做?
用DELPHI语言在datamax<em>打印</em>机上<em>打印</em><em>二维码</em>怎么做?rnrn请问有谁知道,<em>如何</em>用DELPHI语言,在DATAMAX <em>打印</em>机上<em>打印</em><em>二维码</em>?rnrn目前<em>使用</em>的datamax 是用DPL语言写的。rnrn就是想知道<em>如何</em><em>打印</em><em>二维码</em>。公司要求用DELPHI语言来实现。
请教如何使用IxChariot?谢谢
有这方面的说明和教程吗?
【求助】delphi 7 使用infopower
原来用的是<em>delphi</em>6,安装infopower3000可以正常<em>使用</em>。最近换了<em>delphi</em>7,安装infopower4000之后,编译报错,提示找不到C:\Program Files\Woll2Woll\ip4000Trialvcl7\lib\Wwdbigrd.pas,请问这个怎么解决,lib下是有Wwdbigrd.dcu的,求赐教,<em>谢谢</em>...
C语言生成打印结构语句工具
C语言用来生成<em>打印</em>结构体语句的小工具,命令行下运行 格式:命令+包含结构体定义的文件+结构体变量名 默认在程序目录下生成wxx.out文件并<em>打印</em>到屏幕上(注:<em>打印</em>到屏幕上的没加<em>打印</em>语句中的回车符号,你可以自行修改)
使用Delphi代码,如何检查打印机状态
<em>使用</em>Delphi代码,<em>如何</em>检查<em>打印</em>机状态,如缺纸,卡纸,未开机.
如何使用DELPHI打印条形码(三九码)
<em>如何</em>用DELPHI实现条形码的轻版印刷,并能用条形码扫描仪读取出来。我已经实现了条形码的<em>打印</em>,却不能读取不知是否<em>打印</em>机的问题,我的<em>打印</em>机是激光<em>打印</em>机。
Python使用C语言生成的库
下载需要的工具 1、下载pcre库 wget ftp://ftp.csx.cam.ac.uk/pub/software/programming/pcre/pcre-8.37.tar.gz  2、下载SWIG:wget http://sourceforge.net/projects/swig/files/latest/download?source=typ_redirect 安装pcr
Win7-8打印Web二维码打印
Win7-8<em>二维码</em><em>打印</em>问题解决,Web应用程序开发的<em>打印</em><em>如何</em>在Win7-8下进行运行实现<em>打印</em>,大家可以参照,不明白可以留言
打印的问题请教高手
本人是新手,想<em>打印</em>一些报表,怎么方便呢?rn有人说导到excel中去打?怎么做啊?rn能给个例子吗?rn<em>谢谢</em>!
打印请教高手
CPrintDialog printDlg(FALSE);rnrn if (printDlg.DoModal() != IDOK) // Get printer settings from userrn return;rn这段代码只是选择<em>打印</em>页面范围为全部<em>打印</em>,rn<em>如何</em>设置代码才能够使拥护能够选择选择<em>打印</em>页面范围:从第几页到第几页进行<em>打印</em>
打印的乱码问题?请教高手
DocFlavor flavor = DocFlavor.INPUT_STREAM.AUTOSENSE;rn// // 查找所有的可用<em>打印</em>服务rn// PrintService printService[] = PrintServiceLookup.lookupPrintServices(rn// flavor, pras);rn// // 定位默认的<em>打印</em>服务rn// PrintService defaultService = PrintServiceLookuprn// .lookupDefaultPrintService();rn// // 显示<em>打印</em>对话框rn// PrintService service = ServiceUI.printDialog(null, 200, 200,rn// printService, defaultService, flavor, pras);rn// if (service != null) rn// try rn// DocPrintJob job = service.createPrintJob();// 创建<em>打印</em>作业rn// FileInputStream fis = new FileInputStream(file);// 构造待<em>打印</em>的文件流rn// DocAttributeSet das = new HashDocAttributeSet();rn// Doc doc = new SimpleDoc(this,flavor, das);// 建立<em>打印</em>文件格式rn//// job.print(doc, pras);// 进行文件的<em>打印</em>rn// catch (Exception e) rn// e.printStackTrace();rn// rn// rnrn如上代码,<em>打印</em>出来的中文都是乱码.rn如果把第一句 改成:DocFlavor flavor = DocFlavor.SERVICE_FORMATTED.PRINTABLErn将出现如下异常:rndata is not of declared type.rn<em>请教</em><em>高手</em>这个问题的解决方法.
DataGrid 打印,请教高手
datagrid给我们带来了方便,但是他的<em>打印</em>好像集成的不是那么好,怎么才能实现页面上的datagrid单独<em>打印</em>,并且对分页能够兼容,即我们所说的所见即所得,<em>谢谢</em><em>高手</em>的指点 :)
请教VB打印高手
用条件查询,将结果显示在MSHFLexgrid控件中,不用报表控件想得到如下结果:rn1)<em>打印</em>出标题rn2)对MSHFLexgrid控件中的列有选择的<em>打印</em>,rn3)根据设定的行树/每页,决定换页。rn
请教高手打印问题?
小弟想做一个<em>打印</em>程序,rn要求在每页的特定位置,<em>打印</em>一数码,每打一页,该数值就加1,我该怎么做呢rn<em>谢谢</em>各位大侠的参与。
请教高手打印问题
<em>请教</em><em>高手</em>,我在一个过程中打开文件,然后通过参数将这个文件指针传递到另一个过程中进行写入fprintf()操作,为什么写不进去数据?又不报错?请帮个忙解决,<em>谢谢</em>rn
请教高手打印问题
<em>打印</em>对话框弹出时,有一个选项:<em>打印</em>范围,无论何时都是从1到9999页(实际上并没有那么多页)。
不惜重金,请教打印高手
各位大虾:rn 我在做<em>打印</em>程序时遇到了一个问题,代码如下:rn出现的问题是运行到标识的一步时,弹出出错对话框三个按钮的那种,终止,重试,取消rnLRESULT CShenjianView::OnMyPrint(WPARAM a,LPARAM b)rnrn CDC dc;rn PRINTDLG pd;rn LPDEVMODE lpDevMode; rn CPrintDialog printDlg(FALSE); rn if(AfxGetApp()->GetPrinterDeviceDefaults(&pd))rn rn lpDevMode=(LPDEVMODE)pd.hDevMode;rn lpDevMode->dmPaperLength=1500;rn lpDevMode->dmPaperWidth=1100;rn rn printDlg.m_pd.hDevMode=pd.hDevMode;rn dc.Attach(printDlg.GetPrinterDC()); rn dc.m_bPrinting = TRUE; rn CString strTitle; rn strTitle="您当前<em>打印</em>的是生检质量";rn DOCINFO di; rn ::ZeroMemory (&di, sizeof (DOCINFO));rn di.cbSize = sizeof (DOCINFO);rn di.lpszDocName = strTitle;rn BOOL bPrintingOK = dc.StartDoc(&di); //运行到这一步时有问题 rn CPrintInfo Info; rn OnBeginPrinting(&dc, &Info); rn for (UINT page = Info.GetMinPage(); rn page 0); rn rn OnEndPrinting(&dc, &Info); rn if (bPrintingOK)rn dc.EndDoc(); rn elsernrn dc.AbortDoc(); rnrn dc.Detach(); rn return 1;rn
请教打印高手!!!
VB能实现对一级汉字点阵库的缩放功能吗?急!
请教高手,打印问题
我在<em>打印</em>时x坐标超过14460无法显示出,不知什么问题?纸张大小绝对够大.rn x=14460rn y=1008rn这个就可以<em>打印</em>.如果超过了14460,就<em>打印</em>不出来了.
自定义打印??? 请教高手
请问<em>如何</em>通过程序,而不是<em>打印</em>设置对话框设置<em>打印</em>纸的大小rn 这样就可以保证在任何宽窄,大小的纸张上进行<em>打印</em>了rn <em>谢谢</em>了
请教高手打印的问题?
我编了一个不基于CVIEW类的<em>打印</em>程序,在NT下运行良好,但在98下却不行。不知为什么?rn请<em>高手</em>们指教一二!rn<em>谢谢</em>!
请教高手打印问题
<em>请教</em><em>高手</em>,关于<em>打印</em>问题rn要<em>打印</em>窗体form中的内容rn在‘form’中有一‘frame’,‘frame’的高度超过‘form’窗体,而且‘frame’中有许多‘lable’和一个‘picture’。rn要求<em>打印</em>frame中的所有内容(包括超出窗体的lable和picture)rn本人试过窗体<em>打印</em>。无法<em>打印</em>全部内容。
在Delphi中使用类的问题请教高手
请看以下程序,我在Unit2单元中建立了一个类TParams,在Unit1单元中建立了一个类TMyParams,它是从TParams继承而来的。在程序运行时出错:TMyParams不能<em>使用</em>TParams中的私有变量。但把两个类写在一个单元中TMyParams能<em>使用</em>TParams中的私有变量。我想在一般的设计中总会把父类写在一个单独的单元中的,<em>如何</em>解决这个问题?rn另:即使把两个类写在一个单元中,程序运行进没问题,但当程序结束时(点击关闭按钮)程序却报错,这是为何,<em>如何</em>避免?rnrnunit Unit1;rnrninterfacernrnusesrn Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,rn StdCtrls,Unit2;rnrntypern TForm1 = class(TForm)rn Button1: TButton;rn Button2: TButton;rn procedure Button1Click(Sender: TObject);rn privatern Private declarations rn publicrn Public declarations rn end;rn TMyParams = Class(TParams)rn privatern FDpt:string;rn publicrn function getdpt():string;rn procedure setdpt(dpt:string);rn end;rnvarrn Form1: TForm1;rn myParams1:TMyparams;rnimplementationrnrn$R *.DFMrnrnprocedure TMyParams.setdpt(dpt:string);rnbeginrn fdpt:=dpt;rnend;rnrnfunction TMyParams.getdpt ():string;rnbeginrn result :=fdpt;rnend;rnrnrnprocedure TForm1.Button1Click(Sender: TObject);rnbeginrn myParams1.setstyle(3);rn showmessage(inttostr(myParams1.readstyle));rn myParams1.setdpt('aaa');rn showmessage(myparams1.getdpt);rnend;rnrnend.rnrnrnrnunit Unit2;rnrninterfacerntypern TParams = Classrn privatern FStyle:integer;rnrn publicrn function readstyle():integer;rn procedure setstyle(style:integer);rn end;rnvarrn Params:TParams;rnimplementationrnfunction TParams.readstyle():integer;rnbeginrn result:=FStyle;rnend;rnprocedure TParams.setstyle(style:integer);rnbeginrn FStyle:=style;rnend;rnrnend.rn
请教高手delphi 中存储过程的使用
您好,我是一上道时间不长的新手,今天问一同事存储过程的问题,他告诉我说主要用的是用的它的执行后返回的详细信息,<em>高手</em>们哪位有运用存储过程的代码啊,让小弟研究一下,<em>谢谢</em>,
delphi 如何打印文本文件
<em>delphi</em> <em>如何</em>将一个文本文件<em>打印</em>出来(<em>打印</em>机)rn另外它能读取WORD文档吗,<em>如何</em>读rnrn以上两个小问题主要是想解决<em>打印</em>凭票据的问题:rn我有一个固定格式的票据,用的是word,我只需在里面添加一些要素后<em>打印</em>出来,有啥好方法
请教delphi高手高手高手
现有一个鬼子的项目,要求对两张图片中的产品的金属表面质量进行检测,要用到高斯低通滤波代码、图像轮廓提取代码和灰度直方图代码,有哪位前辈可以指点小弟一下,不胜感激!
请教delphi高手们!!
c++中这样一个定义:rntypedef FT_ACTION (*FT_GET_ACTION) (IN FT_STATUS_PT, void *);rn在<em>delphi</em>中该<em>如何</em>表达?
请教DELPHI高手!!
将应用程序拷到另一台机上,数据库、公用环境配置好后,运行时出现找不到有关.dcu文件。该怎么解决??我急用!!!
请教delphi 6 高手
General SQL error.rn[Microsoft][ODBC SQL Server Driver][SQL Server]Login failed for userrn'(null)'.Reason:Not associated with a trusted SQL Serve connection.rnAlias:oyoy.rnrn我的程序在运行时没有错,但是在<em>使用</em>的时候就出现上面的这个问题,请问是什么原因?
请教Delphi的高手,重谢
本人现在在韩国一个机器人公司做研发工作,现在需要开发一个EtherCAT总线的Master。目前有一段例程是用Delphi写的,需要找<em>高手</em>指点一下。我可以提供有关EtherCAT总线的所有核心资料(这些资料都是花重金从德国购入),如果有意者请联系我 rn rnQQ 50274220 rnEmail:allen1979_12@hotmail.com
请教Delphi的COM 高手
请问是否可以为一个TForm来增加一个接口,就象这样:rn TMAINFORM = CLASS ( TFORM , IMYINTERFACE )rnrn接口我是通过new 一个 typelib 增加的, 在main 单元的 initialization 部分rn我用 TComponentFactory.Create(Comserver , TMAINFORM , CLASS_MAINFORM,... )rn在创建工厂类,编译通过了.运行的时候一开始有个问题,好像是TMainForm的类型与rn要求的不匹配,后来将类型库里面自动化部分去掉就可以了,但是目前的问题是虽然rn运行没有问题了,但是这个CLASS_ID好像还是没有注册成功,因为我在注册表里面没有rn找到这个ID,书上一般都是讲new一个automation object的方法来引入一个com对象,rn不知道有没有人做过为 Tform这样的类添加com接口支持?
请教Delphi高手几个问题?
我用C++Builder一年多了。熟悉win32汇编,可就是对Delhpi的代码总是理解不上去啊。rn问题1:rnvarrn TmpRegistry : TRegIniFile;rn TapiProcesses : TStringList;rnbeginrn。。。。。。。。rnTmpRegistry := TRegIniFile.Create('SOFTWARE\TurboPower\APRO\TAPI'); I rn...rnendrn在上面的代码段中根据汇编窗口的显示,第一行就调用构造函数了,可是最后赋值那行又调用了一次,这不是调用了两次构造函数吗?是不是分配了两次的内存?????rnrn问题2:上面的代码段中,<em>如何</em>在申明的时候就赋初值啊?rn就好比在CB中TRegIniFile * p=new TRegIniFile("aaaaaaaa");rn<em>如何</em>在Delphi中实现??????rnrn<em>谢谢</em>诸位解答。
请教各位delphi高手
你们是<em>如何</em>学会各类属性和用法的?是不是看.pas文件的?有什么学习的思想和捷径?rn先<em>谢谢</em>.
请教DELPHI高手
问题1:编译出错问题,具体问题如下rnrnUndeclared identifier 'Editing' at line 61(61,28)rn第61行是这样的cxtlcSetData.Options.Editing:= False;rn而cxtlcSetData的Options属性明明是有Editing的rnrn问题2:既然有错误,为什么能编译生成应用程序?rn
请教delphi高手
有如下一段程序,运行时,在第一个窗口按按钮能打开第二个窗口,在第二个窗口按第一个按钮能打开第三个窗口,但在第二个窗口按第二个按钮不能打开第四个窗口,不知何解,望有<em>高手</em>能指出。rnprogram Project1;rnrnusesrn Forms,rn Unit1 in 'Unit1.pas' Form1,rn Unit2 in 'Unit2.pas' Form2,rn Unit3 in 'Unit3.pas' Form3,rn Unit4 in 'Unit4.pas' Form4;rnrn$R *.resrnrnbeginrn Application.Initialize;rn Application.CreateForm(TForm1, Form1);rn Application.Run;rnend.rnrn//第一单元rnrnunit Unit1;rnrninterfacernrnusesrn Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,rn Dialogs, StdCtrls;rnrntypern TForm1 = class(TForm)rn Button1: TButton;rn Label1: TLabel;rn procedure Button1Click(Sender: TObject);rn privatern Private declarations rn publicrn Public declarations rn end;rnrnvarrn Form1: TForm1;rnrnimplementationrnuses unit2;rn$R *.dfmrnrnprocedure TForm1.Button1Click(Sender: TObject);rnvarrn form2 : TForm2;rnbeginrnform2 := TForm2.Create(self);rnform2.ShowModal;rnform2.free;rnrnrnend;rnrnend.rnrnrn//第二单元rnrnunit Unit2;rnrninterfacernrnusesrn Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,rn Dialogs, ExtCtrls,StdCtrls;rnrntypern TForm2 = class(TForm)rn Button1: TButton;rn Label2: TLabel;rn Button2: TButton;rn procedure Button1Click(Sender: TObject);rn procedure Button2Click(Sender: TObject);rn privatern Private declarations rn publicrn Public declarations rn end;rnrnvarrn Form2: TForm2;rnrnimplementationrn uses unit3, unit4;rn$R *.dfmrnrnprocedure TForm2.Button1Click(Sender: TObject);rnvarrn form3 : TForm3;rnbeginrnform3 := TForm3.Create(self);rnform3.ShowModal;rnform3.free;rnend;rnrnprocedure TForm2.Button2Click(Sender: TObject);rnvarrn form4 : TForm4;rnbeginrnform4 := TForm4.Create(self);rnform4.ShowModal;rnform4.free;rnend;rnrnend.rnrnrn//第三单元rnrnrnunit Unit3;rnrninterfacernrnusesrn Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,rn Dialogs, StdCtrls;rnrntypern TForm3 = class(TForm)rn Label1: TLabel;rn privatern Private declarations rn publicrn Public declarations rn end;rnrnvarrn Form3: TForm3;rnrnimplementationrnrn$R *.dfmrnrnend.rnrnrn//第四单元rnrnunit Unit4;rnrninterfacernrnusesrn Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,rn Dialogs, StdCtrls;rnrntypern TForm4 = class(TForm)rn Label1: TLabel;rn privatern Private declarations rn publicrn Public declarations rn end;rnrnvarrn Form4: TForm4;rnrnimplementationrnrn$R *.dfmrnrnend.
关于delphi请教高手
DELPHI中有那些数据库控件。rn它们是怎样分配线程和进程的内存空间?rn望<em>高手</em>指点!!!
请教高手DELPHI的问题?
DELPHI中:在主窗体显示后以SHOW打开子窗体时<em>如何</em>使新打开的子窗体在最前面显示。
高分请教Delphi高手???
<em>如何</em>监控到用户同时按下Ctrl+Alt+Delete三个键???先谢了!!!
请教DELPHI高手!!!!!
将应用程序拷到另一台机上,数据库、公用环境配置好后,运行时出现找不到有关.dcu文件。该怎么解决??我急用!!!
请教Delphi的高手
<em>如何</em>将MS SQL Sever 2000中建立的数据库与Delphi中的BDE进行连接?
Delphi问题,请教高手
各位朋友:大家好,我已经被江西财经大学用友软件学院高分录取,我很想进入大学学习Delphi开发数据库,请问我应该怎样学习,买哪方面的参考书/rn我应该继续向软件哪个方向发展/
请教Delphi高手
本人在<em>使用</em>Batchmove转换Foxpro数据至Oracle数据库时,出现错误提示,不能将Null值插入Oracle数据表,但在反复进行多次操作后,又可成功。rnrn<em>请教</em>:Batchmove 的源表和目的表是否会对转换数据产生影响,在执行转换前,是否需将两个表打开?
Delphi项目文件请教高手
在文件夹中有很多文件不知道是做什么用的,不知是否能删。rn有.~ddp,.~dfm,~pas,.cfg,.dcu,.ddp等等,这些文件都是做什么用的,哪些能删?rn<em>谢谢</em>!
请教ASP和delphi高手
现在有一个考试系统,用<em>delphi</em>做得考务管理,用asp做得考试答题,要求用<em>delphi</em>加密考题再用asp解密考题。我现在的做法是:用<em>delphi</em>将考题以string类型读出,转化成pchar,再用rnord(pchar(考题)[i])读出每一个字符ascii码,在把每个ascii码加上一个常量,再用chr()转成字符并赋给一个string型变量,最后一次变量值写进数据库。在asp中想用相反的方法解密,没想到不行。例如,在<em>delphi</em>中chr(215)+chr(214)的值是'字',而在asp中却不能得到有意义的值。<em>请教</em><em>高手</em>,应该怎样做才能实现解密效果。rn
oracle10g rac 安装下载
oracle10g rac 安装 Liunx 安装全过程 相关下载链接:[url=//download.csdn.net/download/hq12/2602150?utm_source=bbsseo]//download.csdn.net/download/hq12/2602150?utm_source=bbsseo[/url]
x86 emulator 源码下载
模拟器源代码,内有汇编器、反汇编器,实现windows底层操作,ZwCreateSection, ZwCreateFileMapping, OpenProcess等,含有PE结构解析,引入表IAT重构,调试器dbg,还有linux底层相关的源码等等,自己去宝库发掘。 可以作为实现自己的模拟器的参考,也可以用作其他相关项目的源码参考,相当经典,推荐! 相关下载链接:[url=//download.csdn.net/download/mars6505/3914733?utm_source=bbsseo]//download.csdn.net/download/mars6505/3914733?utm_source=bbsseo[/url]
摄像头控制下载
c#摄像头控制工程,用于控制视频监测,截取图像和保存 相关下载链接:[url=//download.csdn.net/download/ztmkadaj/4412695?utm_source=bbsseo]//download.csdn.net/download/ztmkadaj/4412695?utm_source=bbsseo[/url]
我们是很有底线的