使用delphi+intraweb进行微信开发1~4代码示例

前几讲重点阐述的是使用iw进行微信开发的技术难点及解决方法,提供的都是代码片段(微信消息加解密是完整代码),实际上我始终感觉按照教程实作是掌握一门技术的最重要的方法!不过对于刚刚接触这类开发的朋友来说可能学习曲线陡峭了点,既然如此,特意放出了前4讲的示例代码,去掉了数据库相关操作,保留了最精华的代码部分,直接编译即可进行测试。

下载地址:http://download.csdn.net/detail/netwizard/9475970

此虽为示例代码但是是从我一个即将完工的商业项目中拷贝出来的,因此单元封装很完备,基本稍加修改就可以用于生产环境,不过也因此代码稍微复杂了点,我已经去除了可能给大家带来困扰的所有业务代码,在此代码基础上自行扩展即可用于生产环境。代码中有完备注释,如果还有不明了的地方,可以在博客上留言或者加我QQ:404328970。

代码使用DelphiXE2版本和iw14.0.52进行的编译,个人感觉此代码不支持DelphiXE2以下版本,因为使用了大量的新的Delphi特性,如果你不信,也可以用低版本Delphi编译试试没准也能用。

此代码仅使用了一个叫做CnPack的第三方开源组件包,在www.cnpack.org可以进行下载,主要用于sha1和aes编解码,其他均为Delphi原生组件。

此代码如果不做任何修改当然也可编译的,但是不能按照你的预期运行,需要进行如下修改:

1、uWxApi单元的第 79 行,替换其中的Token为你微信号的Token。
2、uWxMsgHandler单元的第 93 行,替换其中的Token、AppID等为你微信号的相关设置。

3、最关键的,需要修改端口为80,否则是不能接入成功的!

如果编译成功并按照你的预期展示结果了,我将非常欣慰,愿更多的朋友加入iw开发的行列,我忽然发现,这个Delphi下的web开发框架真的很好用!

放几个我iw项目的截图,呵呵,看看,漂亮不,这个就是iw做的,给大伙提提气:

上面的页面在手机上的显示效果,同时支持PC浏览和手机浏览哦:

下面这个使用的是iw的ModalDialog组件哦,呵呵,好用!

下面这个用的iw标准的DbGrid组件做的分页显示,看看效果如何,能满意吗?

时间: 2024-11-03 03:26:57

使用delphi+intraweb进行微信开发1~4代码示例的相关文章

使用delphi+intraweb进行微信开发2—intraweb以.net方式发布(以asp.net mvc4模式部署)在IIS(.net虚拟主机)上

在第一讲使用delphi+intraweb进行微信开发1--微信平台接入中我们编写了一个简单的微信接口程序,这个程序我是用Stand Alone Server / Service 方式编译的程序,并且将端口设置成80进行的微信接口测试,但是实际使用时为了更好的服务器性能我们一般采用iis作为web服务器,以往的情况下iw需要编译成isapi部署在iis上.但是由于自打iis7以后iis对isapi的态度发生了很大变化(推荐使用fastcgi了)导致编译好的isapi很难在iis7.5上部署成功,

使用delphi+intraweb进行微信开发5—准备实现微信API,先从获取AccessToken开始

在前4讲中我们已经使iw开发的应用成功和微信进行了对接,再接下来的章节中我们开始逐一尝试和实现微信的各个API,开始前先来点准备工作. 首先需要明确的是,微信的API都是通过https调用实现的,分为post方法调用和get方法调用.不需要上传数据的采用get方法(例如获取AccessToken),而需要向微信服务器提交数据的采用post方法(例如创建菜单). 微信方法调用均需传递AccessToken(URL参数方式),这个AccessToken不是我们微信接入时使用的Token,这个Acce

使用delphi+intraweb进行微信开发1--微信平台接入

iw14.0.50来了,在新的版本中最吸引我的就是增加了完善的httphandler功能:终于可以直接在地址栏输入url打开iw功能页面了:可以自由使用EasyUI等js框架了:显示模式对话框也不再七绕八绕惹人烦了:呵呵,我感觉iw第一次接近主流web开发工具了! 兴奋过了,来尝试一下吧.其实iw的坑还是挺多的,虽然已经接近主流了,但是,后面慢慢都会说到… 1.新建一个iw工程,选择Stand Alone Server / Service,这种模式下进行开发是最理想的,调试很方便,正式发布时可以

使用delphi+intraweb进行微信开发4—微信消息加解密

在上一讲当中我做了个简单的微信文本消息回显应用,当时是以微信明文方式实现的,其实微信推荐的是消息应该加密传输以增加安全性,所以这讲说说微信消息的加解密. 在微信的帮助页面上可以下载微信消息加解密的例程,可惜的是没有Delphi语言的示例,网上搜索一番,没有人贡献出写好的Delphi版的微信加解密算法单元,好在有官方示例的C#版的,那就按照C#的改一个吧. 微信消息是以AES算法进行的加密处理,而遗憾的是Delphi并没有内置的AES算法单元,必须找第三方实现的,不过一般第三方实现的算法都因为种种

微信发送模板消息代码示例

最近一个微信的项目里需要发送微信模板消息给卖家或者供应商等,微信开发其实也就按照微信的官方接口要求组装起来即可,下面简单介绍一下我的微信模板发送代码. 1.获取access token,至于access token是什么,大家可以自行微信接口文档看一下,这边不多说 获取access token我这边主要是用定时器没大概2分钟获取一次,每天获取的次数是100000次,用法如下: 1 #region 2 3 using System; 4 using System.Timers; 5 6 #endr

h5+分享到微信、朋友圈代码示例

(function(window) { var Share={}; Share.info = { id: '', name: '', head_image: "_www/images/icon/A/144.png", introduce: '' }; /** * 更新分享服务 */ var shares = null; function getSerivces() { plus.share.getServices(function(s) { shares = {}; for (var

[转载红鱼儿]delphi 实现微信开发(2)接入微信公众号平台

先要学习一下接入的资料,在这里,因为原理都在,所以一定要认真阅读,然后,利用Delphi实现一个对应函数: function CheckSignature(const signature, timestamp, nonce, token: string): boolean; var strs: TStringList;   tmpStr: string; begin strs := TStringList.Create;   try     strs.Add(token);     strs.A

[转载红鱼儿]delphi 实现微信开发(1)

大体思路: 1.用户向服务号发消息,(这里可以是个菜单项,也可以是一个关键词,如:注册会员.) 2.kbmmw web server收到消息,生成一个图文消息给微信,在图文消息中做好自己的url,在url中,可以把第一步消息带来的openid写到url的参数表中. 3.用户点这个图文消息 4.web server收到这个图文消息的url,根据这个url,生成一个网页给微信,这里面关键是把openid写到网页中 5.用户填写这个网页,提交(提交的同时也把openid也提交回来了) 6.Ok,现在得

Delphi XE7 用indy开发微信公众平台所有功能,可刷阅读,可刷赞,可加推广(除微支付)

http://www.cnblogs.com/devinlee/p/4565933.html Delphi XE7 用indy开发微信公众平台所有功能,可刷阅读,可刷赞,可加推广(除微支付) 关注作者的微信公众平台,测试效果 包含微信公众平台的所有功能(除微支付) 示例代码:(如需要全部代码,请加作者微信:Leedege) 复制代码 function UpNews(Num: Integer; AccessToken: String): String; var J: TJSONObject; N: