国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > 易語言 > 正文

易語言制作二維碼生成器

2024-07-21 23:02:56
字體:
來源:轉載
供稿:網友

DLL命令表

.版本 2.DLL命令 二維碼_外形設置, , "QRCodeWin32.dll", "QRAppearance"  .參數 模塊尺寸, 雙精度小數型  .參數 方向, 整數型  .參數 邊框, 整數型.DLL命令 二維碼_編碼參數, , "QRCodeWin32.dll", "QRConfigure"  .參數 版本, 整數型  .參數 糾錯級別, 整數型  .參數 掩膜, 整數型.DLL命令 二維碼_默認設置, , "QRCodeWin32.dll", "QRSetDefault".DLL命令 二維碼_設置文本信息, , "QRCodeWin32.dll", "QRSetMessage"  .參數 文本, 文本型.DLL命令 二維碼_獲取模塊數, , "QRCodeWin32.dll", "QRGetActualRC"  .參數 行, 整數型, 傳址  .參數 列, 整數型, 傳址.DLL命令 二維碼_設置圖像分辨率, , "QRCodeWin32.dll", "QRSetSize"  .參數 寬度, 整數型  .參數 高度, 整數型.DLL命令 二維碼_保存到bmp文件, 整數型, "QRCodeWin32.dll", "QRSaveAsBMP"  .參數 文件名, 文本型.DLL命令 二維碼_復制wmf圖片到剪輯板, 整數型, "QRCodeWin32.dll", "QRCopyToClipboard".DLL命令 二維碼_設置前景色, , "QRCodeWin32.dll", "QRSetBackColor"  .參數 紅, 整數型  .參數 綠, 整數型  .參數 藍, 整數型.DLL命令 二維碼_設置背景色, , "QRCodeWin32.dll", "QRSetBarColor"  .參數 紅, 整數型  .參數 綠, 整數型  .參數 藍, 整數型

生成二維碼

.版本 2.支持庫 BmpOperate.程序集 程序集1.子程序 _啟動子程序, 整數型, , 請在本子程序中放置易模塊初始化代碼_臨時子程序 ()返回 (0).子程序 _臨時子程序載入 (窗口1, , 假).子程序 快速生成二維碼, 字節集, 公開, 返回生成的二維碼圖像數據.參數 原始文本, 文本型, , 超過120字符的只取前120字符,如果有漢字,可能出現亂碼.參數 條碼版本, 整數型, 可空, 取值0~40,留空時為設置為0自動.參數 糾錯級別, 整數型, 可空, 由低到高0~4,留空時為設置為0低.參數 點陣大小, 雙精度小數型, 可空, 取值0.02~0.26,留空設置為0.02.局部變量 圖片, 字節集.局部變量 位圖, 位圖.局部變量 目標位圖, 位圖.局部變量 I, 整數型.局部變量 頂點X, 整數型.局部變量 頂點Y, 整數型.局部變量 寬高, 整數型.如果真 (取文本長度 (原始文本) > 120)  原始文本 = 取文本左邊 (原始文本, 120).如果真結束.如果真 (是否為空 (條碼版本))  條碼版本 = 0.如果真結束.如果真 (條碼版本 < 0)  條碼版本 = 0.如果真結束.如果真 (條碼版本 > 40)  條碼版本 = 40.如果真結束.如果真 (是否為空 (糾錯級別))  糾錯級別 = 0.如果真結束.如果真 (糾錯級別 < 0)  糾錯級別 = 0.如果真結束.如果真 (糾錯級別 > 4)  糾錯級別 = 4.如果真結束.如果真 (是否為空 (點陣大小))  點陣大小 = 0.02.如果真結束.如果真 (點陣大小 < 0.02)  點陣大小 = 0.02.如果真結束.如果真 (點陣大小 > 0.26)  點陣大小 = 0.26.如果真結束二維碼_設置文本信息 (原始文本)二維碼_設置前景色 (255, 255, 255)二維碼_設置背景色 (0, 0, 0)二維碼_編碼參數 (條碼版本, 糾錯級別, 5)二維碼_外形設置 (點陣大小, 1, 0)二維碼_設置圖像分辨率 (400, 400)二維碼_保存到bmp文件 (取運行目錄 () + “/二維碼圖片.bmp”)位圖.創建 (400, 400, 1, 0)位圖.載入文件 (取運行目錄 () + “/二維碼圖片.bmp”)取位圖圖象頂點 (位圖, 頂點X, 頂點Y).計次循環首 (399, I)  .如果真 (位圖.取某點顏色 (頂點X + I - 1, 頂點Y) = 0 且 位圖.取某點顏色 (頂點X, 頂點Y + I - 1) = 0)    寬高 = I  .如果真結束  .如果真 (頂點X + I - 1 ≥ 399 或 頂點Y + I - 1 ≥ 399)    跳出循環 ()  .如果真結束.計次循環尾 ()目標位圖.創建 (寬高, 寬高, 1, 0)位圖.復制到 (頂點X, 頂點Y, 寬高, 寬高, 目標位圖, 0, 0, )圖片 = 目標位圖.取位圖數據 ()刪除文件 (取運行目錄 () + “/二維碼圖片.bmp”)返回 (圖片).子程序 取位圖圖象頂點.參數 位圖, 位圖.參數 頂點X, 整數型, 參考.參數 頂點Y, 整數型, 參考.局部變量 X, 整數型.局部變量 Y, 整數型.計次循環首 (400, X)  .計次循環首 (400, Y)    .如果真 (位圖.取某點顏色 (X - 1, Y - 1) = 0)      頂點X = X - 1      頂點Y = Y - 1      返回 ()    .如果真結束  .計次循環尾 ().計次循環尾 ()

轉換二維碼啟動窗口

.版本 2.程序集 窗口程序集1.子程序 _生成按鈕_被單擊二維碼圖片框.圖片 = 快速生成二維碼 (要轉換內容編輯框.內容, 到數值 (組合框_版本.現行選中項), 到數值 (組合框_糾錯.現行選中項), 到數值 (組合框_點陣.內容)).子程序 _窗口1_創建完畢組合框_版本賦值 ()_生成按鈕_被單擊 ().子程序 組合框_版本賦值.局部變量 n, 整數型.局部變量 像素, 整數型.局部變量 文本, 文本型.局部變量 數值, 雙精度小數型數值 = 0.02像素 = 21組合框_版本.加入項目 (“自動”, ).計次循環首 (40, n)  文本 = 到文本 (像素)  組合框_版本.加入項目 (“版本_” + 到文本 (n) + “  ” + 文本 + “×” + 文本, )  像素 = 像素 + 4.計次循環尾 ().計次循環首 (24, n)  數值 = 數值 + 0.01  組合框_點陣.加入項目 (到文本 (數值), ).計次循環尾 ()

運行結果:

易語言,二維碼,生成器

總結

以上就是這篇文章的全部內容了,希望本文的內容對大家的學習或者工作具有一定的參考學習價值,謝謝大家對VeVb武林網的支持。


注:相關教程知識閱讀請移步到易語言教程頻道。
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 扎鲁特旗| 宜宾市| 乌拉特中旗| 平南县| 平罗县| 扬州市| 孟连| 博兴县| 洪湖市| 乐东| 泰兴市| 吉安县| 会东县| 三穗县| 宾川县| 忻城县| 临漳县| 出国| 石阡县| 平南县| 泰来县| 凤山市| 韩城市| 象山县| 晴隆县| 黄大仙区| 乃东县| 林芝县| 富民县| 体育| 灵璧县| 通山县| 赫章县| 古丈县| 临沂市| 富裕县| 香格里拉县| 任丘市| 绩溪县| 周口市| 清苑县|