![](https://img-blog.csdnimg.cn/20201014180756757.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
delphi
文章平均质量分 71
dawn_rainy
路漫漫其修远兮,吾将上下而求索
展开
-
delphi 连接网口打印机 通过图像打印二维码 出现黑块 的解决之路
procedure draw2PxPoint(userid: string; bmp: TBitmap; isNet: Boolean; align: Integer);var PicNamearray: array[0..20] of Byte; Send: string; size: Integer; data: array of Byte; k, i, j, m, n, index: Integer; canvas: TCanvas; b:..原创 2021-12-14 17:11:37 · 1620 阅读 · 0 评论 -
delphi 连接网口打印机 发送指令打印二维码
procedure getQRBitmap(printstr:string);var moduleSize: Integer; slength: Integer; Send: string; Send_Length:String; PicNamearray: array[0..50] of Byte;begin moduleSize := 8; slength:=Length(printstr); //存入二维码数据 Send_L.原创 2021-12-14 16:05:31 · 1282 阅读 · 0 评论 -
条形码打印 -- Delphi
不知道还有多少像我这样的程序员,发挥着余热,在公司做安卓开发,却一直维护着一个Delphi的打印项目。现如今,找资料是真难。我一直都很懒,想着拼拼凑凑了好几天弄明白的东西,还是记录下来。也许,就刚好有人需要了呢。这个打印项目也是可以选择驱动打印和网口打印。网口打印很简单,只是简单的发送指令就可以了。可是驱动打印我真的是在网上扑了个空。最后用最原始的方式,完全看明白了条形码的生成规则,画在画布上打印出来。Windows是面向图形编程,这话真没有错。有不明白的部分,可以参考上一篇文章...原创 2021-09-07 15:10:42 · 956 阅读 · 0 评论 -
AdvStringGrid常用操作
(1)如何设置表格固定的列数,如下图所示:AdvStringGrid使用小结这里固定的列数为3列,通过设置下面属性来改变固定的列数:AdvStringGrid.FixedCols:=n;(n为要固定的列数值)(2)如何从AdvStringGrid中读取和向AdvStringGrid中导入值:AdvStringGrid.Cells[j,i]:=str;(向其单元格赋值)这里需要注意的是,j...原创 2019-07-29 16:12:35 · 1585 阅读 · 0 评论