tkggvbr的博客

利用手机的摄像头，扫描识别二维码，对二维码图片能触屏缩放。delphi xe10制作，在华为荣耀9安装使用成功。

识别电脑桌面上出现的二维码。using System; using System.Drawing; using System.Text; using System.Windows.Forms; using System.IO; using ZXing.QrCode; using ZXing; using ZXing.Common; using System.Runtime.InteropServices;

能将电脑桌面上出现的二维码进行识别。 using System; using System.Drawing; using System.Text; using System.Windows.Forms; using System.IO; using ZXing.QrCode; using ZXing; using ZXing.Common; using System.Runtime.InteropServices;

能识别含有二维码的图片（*.bmp格式），把内容显示出来。平台windows 7,32位+delphi xe8。参考前辈的代码修改而成。

将Excel嵌入窗体上。unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls, ExtCtrls; type TForm1 = class(TForm) Edit1: TEdit; Panel1: TPanel; OpenDialog1: TOpenDialog; Button1: TButton;

delphi对Excel添加宏并运行 implementation uses VBIDE2000; {$R *.dfm} ... FExcelApplication.Visible[0] := True; FExcelApplication.Run('MyMacro');