Delphi 二维码生成 

http://download.csdn.net/detail/warrially/7370171