{ 工作中遇到这样的需求，苦苦找不到相关的代码，找到一个还是收费的！：（ 本着共享互惠的精神，本人简单实现了一个 FastReport 打印二维码的应用。 使用方法非常简单，将压缩包中的 frx2DBarcode 单元添加到引用即可在报表设计中看到 2D 条码对象，进行设计、打印。 目前仅实现了 QRCcode 的打印，抛砖引玉，相信增加 PDF417，DM 编码应该不会太难。 如果对源代码做了改进和修改欢迎 EMAIL 给我一份，学习一下！ 邮件： JulyXDay@QQ.COM 谢谢支持！ } {******************************************} { } { FastReport v4.0 } { 2DBarcode object } { } { Copyright (c) 2012 } { by LiKejian } { QQ 39839655 } { } {******************************************} unit frx2DBarcode; interface {$I frx.inc} uses Windows, Messages, SysUtils, Classes, Graphics, frxClass {$IFDEF Delphi6} , Variants {$ENDIF}; type TfrxBarcode2DObject = class(TComponent); // fake component TfrxBarcode2DView = class(TfrxView) private FEccLevel: SmallInt; FModule: SmallInt; FVersion: SmallInt; FText: String; FExpression: String; public constructor Create(AOwner: TComponent); override; procedure Draw(Canvas: TCanvas; ScaleX, ScaleY, OffsetX, OffsetY: Extended); override; class function GetDescription: String; override; procedure GetData; override; published property Version: SmallInt read FVersion write FVersion default 0; property EccLevel: SmallInt read FEccLevel write FEccLevel default 0; property Module: SmallInt read FModule write FModule default 0; property DataField; property DataSet; property DataSetName; property Expression: String read FExpression write FExpression; property Frame; property Text: String read FText write FText; end; implementation uses frx2DBarcodeRTTI, frxDsgnIntf, frxRes, frxUtils, uQRCode; constructor TfrxBarcode2DView.Create(AOwner: TComponent); begin inherited; end; class function TfrxBarcode2DView.GetDescription: String; begin Result := '2D 条形码对象'; end; procedure TfrxBarcode2DView.Draw(Canvas: TCanvas; ScaleX, ScaleY, OffsetX, OffsetY: Extended); const sFileName = 'QRCode.bmp'; var oBmp: TBitmap; begin BeginDraw(Canvas, ScaleX, ScaleY, OffsetX, OffsetY); //Create 2D Barcode CreateQRCode(FText, FVersion, FEccLevel, FModule); if FileExists(sFileName) then begin oBmp := TBitmap.Create; oBmp.LoadFromFile(sFileName); frxDrawGraphic(Canvas, Rect(FX, FY, FX1, FY1), oBmp, IsPrinting, False, False, 0); FreeAndNil(oBmp); end; DrawFrame; end; procedure TfrxBarcode2DView.GetData; begin inherited; if IsDataField then FText := VarToStr(DataSet.Value[DataField]) else if FExpression <> '' then FText := VarToStr(Report.Calc(FExpression)); end; initialization frxObjects.RegisterObject1(TfrxBarcode2DView, nil, '', '', 0, 23); finalization frxObjects.UnRegister(TfrxBarcode2DView); end.

多媒体的课程设计 用程序实现算术编码 用java语言实现了算术编码 内容包括：编码和解码的源代码（cdoing.java decoding.java）；论文；编译好的程序（只要安装jdk且配好环境变量的机器就可以运行）

用C#实现的锁屏软件，包括禁用ctrl+alt+del(真正的禁用，不是修改注册表禁用，引用了别人写的DLL，不过在windows7下无效，目前好像还没有有效简单的办法禁用win7的该组合键)、禁用常用的系统组合键(用全局钩子)，可以自己设置密码，提示语等，开启软件后鼠标只能在锁屏软件框内活动。这是本人在学C#不久后做的一个小练习，参考了网上找到的一些例子，希望对C#初学者特别是想学习winform程序，全局钩子等内容的童鞋们提供帮助。本人QQ：287630906，我是初学者，希望能和大家一起交流学习。

C#写的五子棋游戏含源代码，针对初学者学习， 扫描棋盘的空点，对于每个空点，读取它四周8个方向的棋子的分布图，分析此点在棋盘中的重要性，量化评分。最后根据评分最高的点来进行电脑下棋。

基于KPI/KQI的语音质量评估系统，用java语言在eclipse上编写，上面有详细的代码说明，谢谢！

系统可实现的功能如下： （1）录入每个学生的学号、姓名和n门课程的考试成绩； （2）计算每个学生的总分； （3）按每个学生的总分由低到高排出名次表； （4）按每个学生的总分由高到低排出名次表； （5）按某一门特定课程的成绩由低到高排出名次表； （6）按某一门特定课程的成绩由高到低排出名次表； （7）按学号由小到大排出成绩表； （8）按学号查询学生考试成绩，支持模糊查询； （9）按姓名查询学生考试成绩，支持模糊查询； （10）输出每个学生的学号、姓名、各科考试成绩； （11）将每个学生的记录信息（原始数据）写入文件； （12）将排序后的信息及查询到的信息写入文件。 操作时伴随音效。 程序运行后的提示如下： 欢迎使用学生成绩管理系统！ 请输入涉及到的课程数（不多于10）: 请输入n门课程的名称，以回车符分隔。 请依次输入各学生的信息。 输入格式：姓名+学号+n门课程的成绩，均以回车符分隔，成绩顺序同课程名称顺序。 输入： 1：添加学生信息。 0：停止添加学生信息。 添加完学生信息后，提示用户输入数字来执行相应的操作。

C#web开发者指南教程PDF(含源代码),很适合入门学习C#web制作web应用程序。附带源代码。

基于STM32的音乐播放器设计【含源代码文件+PCB原理图+源码+论文等】

使用java+前端，实现书籍管理

基本功能： 网站显示商品分类和商品信息，提供搜索商品、浏览商品的功能； 用户能够注册后购物，查看订单、购物车和个人信息； 管理员有管理商品和用户的功能。 实现效果： 图片放大特效，浮动广告，文字滚动，商品秒杀活动，用户注册验证等。 1.1功能介绍 基本实现了网站显示商品分类和商品信息，提供搜索商品、浏览商品的功能；注册和登录，查看订单、购物车和个人信息注册验证；图片放大特效，浮动广告，弹窗广告，文字滚动，商品秒杀活动等。 1.2开发技术 综合运用HTML+CSS+JavaScript技术。 2.1 系统模块划分 网页的模块主要由主页、栏目页、商品详情页、轮播页、个人信息登录页面、秒杀页、购物车、注册和登录、咨询跳转到微信和QQ页、流动广告、弹窗广告等