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

示例代码已经放出!请移步使用delphi+intraweb进行微信开发1~4代码示例进行下载,虽为示例代码但是是从我项目中移出来的,封装很完备适于自行扩展和修改。

 

iw14.0.50来了,在新的版本中最吸引我的就是增加了完善的httphandler功能:终于可以直接在地址栏输入url打开iw功能页面了;可以自由使用EasyUI等js框架了;显示模式对话框也不再七绕八绕惹人烦了;呵呵,我感觉iw第一次接近主流web开发工具了!

兴奋过了,来尝试一下吧。其实iw的坑还是挺多的,虽然已经接近主流了,但是,后面慢慢都会说到…

1、新建一个iw工程,选择Stand Alone Server / Service ,这种模式下进行开发是最理想的,调试很方便,正式发布时可以再建立一个library型的工程发布到.net服务器上。(是的,大家没有看错,现在iw已经脱离了isapi模式,可以像部署.net mvc4应用一样部署到iis上,后面会解释,.net虚拟主机也可以发布iw应用了!巨大的进步。)

 

2、保存工程后在工程中添加一个新的单元文件,例如起名为wxapi.pas,这个文件中的代码将承担微信接入工作。代码如下:

interface 

uses 
  ClassesIW.Content.BaseSystem.SysUtils,HTTPAppIWApplication
  IW.HTTP.RequestIW.HTTP.Reply

type 
  /// <summary> 
  /// 从TContentBase继承下来的类,就相当于asp.net中的httphandler 
  /// </summary> 
  TWxApi class(TContentBase
  protected 
   function Execute(aRequestTHttpRequestaReplyTHttpReplyconst aPathnamestringaSessionTIWApplicationaParamsTStrings): Booleanoverride
  public 
    constructor Createoverride
  end

implementation 

uses 
  ServerControllerUserSessionUnitCrypt.SHA1

{ TWxApi } 

constructor TWxApi.Create
begin 
  inherited
  // 文件不需要真实存在 
  FileMustExist := False
end

function TWxApi.Execute(aRequestTHttpRequestaReplyTHttpReply
  const aPathnamestringaSessionTIWApplication
  aParamsTStrings): Boolean
var 
  signaturestring
  timestampstring
  noncestring
  echostrstring
  strsTStringList
  tmpStrstring
begin 
  Result := True

  signature := aParams.Values['signature']; 
  timestamp := aParams.Values['timestamp']; 
  nonce := aParams.Values['nonce']; 
  echostr := aParams.Values['echostr']; 

  strs := TStringList.Create
  strs.Add('MyTestToken');    // Token,要和微信接口配置信息保持一致 
  strs.Add(timestamp); 
  strs.Add(nonce); 
  strs.Sort

  tmpStr := strs[0]+strs[1]+strs[2]; 
  tmpStr := SHA1(AnsiString(tmpstr)); 

  

转载于:https://www.cnblogs.com/zeromuisc/articles/5495798.html

安装说明如下: ********************************************************************** * Author: TMS Software * * Copyright ?2002-2004 * * E-mail: info@tmssoftware.com * * Web: http://www.tmssoftware.com * ********************************************************************** TMS IntraWeb Components for - Delphi 5.0/6.0/7.0/2005 - C++Builder 5.0/6.0 ------------------------------------------------------------------------------ TMS IntraWeb Components for IntraWeb v5.0.x v5.1.x v6.0.x v7.0.x v7.1.x v7.2.x ------------------------------------------------------------------------------ Installation: NOTE: FOR ADDITIONAL QUESTIONS: see http://www.tmssoftware.com/tmsiwfaq.htm For Delphi (IntraWeb 5.0.x) --------------------------- Copy tmsdefs5.inc to tmsdefs.inc ! (Registered version only) Install package files - IW5TMSD7.DPK (Delphi 7) Install package files - IW5TMSDED7.DPK (Delphi 7) For Delphi (IntraWeb 5.1.x) --------------------------- Copy tmsdefs51.inc to tmsdefs.inc ! (Registered version only) Install package files - IW51TMSD5.DPK (Delphi 5) - IW51TMSD6.DPK (Delphi 6) - IW51TMSD7.DPK (Delphi 7) Install package files - IW51TMSDED5.DPK (Delphi 5) - IW51TMSDED6.DPK (Delphi 6) - IW51TMSDED7.DPK (Delphi 7) For Delphi (IntraWeb 6.0.x) --------------------------- Copy tmsdefs6.inc to tmsdefs.inc ! (Registered version only) Install package files - IW6TMSD5.DPK (Delphi 5) - IW6TMSD6.DPK (Delphi 6) - IW6TMSD7.DPK (Delphi 7) Install package files - IW6TMSDED5.DPK (Delphi 5) - IW6TMSDED6.DPK (Delphi 6) - IW6TMSDED7.DPK (Delphi 7) For Delphi (IntraWeb 7.0.x) --------------------------- Copy tmsdefs7.inc to tmsdefs.inc ! (Registered version only) Install package files - IW7TMSD5.DPK (Delphi 5) - IW7TMSD6.DPK (Delphi 6) - IW7TMSD7.DPK (Delphi 7) Install package files - IW7TMSDED5.DPK (Delphi 5) - IW7TMSDED6.DPK (Delphi 6) - IW7TMSDED7.DPK (Delphi 7) For Delphi (IntraWeb 7.1.x) --------------------------- Copy tmsdefs71.inc to tmsdefs.inc ! (Registered version only) Install package files - IW71TMSD5.DPK (Delphi 5) - IW71TMSD6.DPK (Delphi 6) - IW71TMSD7.DPK (Delphi 7) Install package files - IW71TMSDED5.DPK (Delphi 5) - IW71TMSDED6.DPK (Delphi 6) - IW71TMSDED7.DPK (Delphi 7) For Delphi (IntraWeb 7.2.x) --------------------------- Copy tmsdefs72.inc to tmsdefs.inc ! (Registered version only) Install package files - IW72TMSD5.DPK (Delphi 5) - IW72TMSD6.DPK (Delphi 6) - IW72TMSD7.DPK (Delphi 7) - IW72TMSD2005.bdsproj (Delphi 2005) Install package files - IW72TMSDED5.DPK (Delphi 5) - IW72TMSDED6.DPK (Delphi 6) - IW72TMSDED7.DPK (Delphi 7) - IW72TMSDED2005.bdsproj (Delphi 2005) For C++Builder (IntraWeb 5.0.x) ------------------------------- Install package files - IW5TMSC5.DPK (C++Builder 5) - IW5TMSC6.DPK (C++Builder 6) Install package files - IW5TMSDEC5.DPK (C++Builder 5) - IW5TMSDEC6.DPK (C++Builder 6) For C++Builder (IntraWeb 5.1.x) ------------------------------- Copy tmsdefs51.inc to tmsdefs.inc ! (Registered version only) Install package files - IW51TMSC5.DPK (C++Builder 5) - IW51TMSC6.DPK (C++Builder 6) Install package files - IW51TMSDEC5.DPK (C++Builder 5) - IW51TMSDEC6.DPK (C++Builder 6) For C++Builder (IntraWeb 6.0.x) ------------------------------- Copy tmsdefs6.inc to tmsdefs.inc ! (Registered version only) Install package files - IW6TMSC5.DPK (C++Builder 5) - IW6TMSC6.DPK (C++Builder 6) Install package files - IW6TMSDEC5.DPK (C++Builder 5) - IW6TMSDEC6.DPK (C++Builder 6) For C++Builder (IntraWeb 7.0.x) ------------------------------- Copy tmsdefs7.inc to tmsdefs.inc ! (Registered version only) Install package files - IW7TMSC5.DPK (C++Builder 5) - IW7TMSC6.DPK (C++Builder 6) Install package files - IW7TMSDEC5.DPK (C++Builder 5) - IW7TMSDEC6.DPK (C++Builder 6) For C++Builder (IntraWeb 7.1.x) ------------------------------- Copy tmsdefs71.inc to tmsdefs.inc ! (Registered version only) Install package files - IW71TMSC5.DPK (C++Builder 5) - IW71TMSC6.DPK (C++Builder 6) Install package files - IW71TMSDEC5.DPK (C++Builder 5) - IW71TMSDEC6.DPK (C++Builder 6) For C++Builder (IntraWeb 7.2.x) ------------------------------- Copy tmsdefs72.inc to tmsdefs.inc ! (Registered version only) Install package files - IW72TMSC5.DPK (C++Builder 5) - IW72TMSC6.DPK (C++Builder 6) Install package files - IW72TMSDEC5.DPK (C++Builder 5) - IW72TMSDEC6.DPK (C++Builder 6) ------------------------------- Installing the debug add-on OCX ------------------------------- From the DOS command line run : REGSVR32 DebugOutXControl1.ocx ------------------------------------------- TMS IntraWeb Components Pro for IntraWeb v5 ------------------------------------------- Additional installation: For Delphi (IntraWeb 5.0.x) --------------------------- Install package files - IW5TMSGRIDD5.DPK (Delphi 5) - IW5TMSGRIDD6.DPK (Delphi 6) - IW5TMSGRIDD7.DPK (Delphi 7) Install package files - IW5TMSGRIDDED5.DPK (Delphi 5) - IW5TMSGRIDDED6.DPK (Delphi 6) - IW5TMSGRIDDED7.DPK (Delphi 7) For Delphi (IntraWeb 5.1.x) --------------------------- Install package files - IW51TMSGRIDD5.DPK (Delphi 5) - IW51TMSGRIDD6.DPK (Delphi 6) - IW51TMSGRIDD7.DPK (Delphi 7) Install package files - IW51TMSGRIDDED5.DPK (Delphi 5) - IW51TMSGRIDDED6.DPK (Delphi 6) - IW51TMSGRIDDED7.DPK (Delphi 7) For Delphi (IntraWeb 6.0.x) --------------------------- Install package files - IW6TMSGRIDD5.DPK (Delphi 5) - IW6TMSGRIDD6.DPK (Delphi 6) - IW6TMSGRIDD7.DPK (Delphi 7) Install package files - IW6TMSGRIDDED5.DPK (Delphi 5) - IW6TMSGRIDDED6.DPK (Delphi 6) - IW6TMSGRIDDED7.DPK (Delphi 7) For Delphi (IntraWeb 7.0.x) --------------------------- Install package files - IW7TMSGRIDD5.DPK (Delphi 5) - IW7TMSGRIDD6.DPK (Delphi 6) - IW7TMSGRIDD7.DPK (Delphi 7) Install package files - IW7TMSGRIDDED5.DPK (Delphi 5) - IW7TMSGRIDDED6.DPK (Delphi 6) - IW7TMSGRIDDED7.DPK (Delphi 7) For Delphi (IntraWeb 7.1.x) --------------------------- Install package files - IW71TMSGRIDD5.DPK (Delphi 5) - IW71TMSGRIDD6.DPK (Delphi 6) - IW71TMSGRIDD7.DPK (Delphi 7) Install package files - IW71TMSGRIDDED5.DPK (Delphi 5) - IW71TMSGRIDDED6.DPK (Delphi 6) - IW71TMSGRIDDED7.DPK (Delphi 7) For Delphi (IntraWeb 7.2.x) --------------------------- Install package files - IW72TMSGRIDD5.DPK (Delphi 5) - IW72TMSGRIDD6.DPK (Delphi 6) - IW72TMSGRIDD7.DPK (Delphi 7) - IW72TMSGRIDD2005.bdsproj (Delphi 2005) Install package files - IW72TMSGRIDDED5.DPK (Delphi 5) - IW72TMSGRIDDED6.DPK (Delphi 6) - IW72TMSGRIDDED7.DPK (Delphi 7) - IW72TMSGRIDDED2005.bdsproj (Delphi 2005) ---------------------------------------------------------- TMS IntraWeb Components Pro Script Edition for IntraWeb v6 ---------------------------------------------------------- For Delphi (IntraWeb 6.0.x) --------------------------- Install package files - IW6TMSSED5.DPK (Delphi 5) - IW6TMSSED6.DPK (Delphi 6) - IW6TMSSED7.DPK (Delphi 7) For Delphi (IntraWeb 7.0.x) --------------------------- Install package files - IW7TMSSED5.DPK (Delphi 5) - IW7TMSSED6.DPK (Delphi 6) - IW7TMSSED7.DPK (Delphi 7) For Delphi (IntraWeb 7.1.x) --------------------------- Install package files - IW71TMSSED5.DPK (Delphi 5) - IW71TMSSED6.DPK (Delphi 6) - IW71TMSSED7.DPK (Delphi 7) For Delphi (IntraWeb 7.2.x) --------------------------- Install package files - IW72TMSSED5.DPK (Delphi 5) - IW72TMSSED6.DPK (Delphi 6) - IW72TMSSED7.DPK (Delphi 7) - IW72TMSSED2005.bdsproj (Delphi 2005) For C++Builder (IntraWeb 5.0.x) ------------------------------- Install package files - IW5TMSGRIDC5.DPK (C++Builder 5) - IW5TMSGRIDC6.DPK (C++Builder 6) Install package files - IW5TMSGRIDDEC5.DPK (C++Builder 5) - IW5TMSGRIDDEC6.DPK (C++Builder 6) For C++Builder (IntraWeb 5.1.x) ------------------------------- Install package files - IW51TMSGRIDC5.DPK (C++Builder 5) - IW51TMSGRIDC6.DPK (C++Builder 6) Install package files - IW51TMSGRIDDEC5.DPK (C++Builder 5) - IW51TMSGRIDDEC6.DPK (C++Builder 6) For C++Builder (IntraWeb 6.0.x) ------------------------------- Install package files - IW6TMSGRIDC5.DPK (C++Builder 5) - IW6TMSGRIDC6.DPK (C++Builder 6) Install package files - IW6TMSGRIDDEC5.DPK (C++Builder 5) - IW6TMSGRIDDEC6.DPK (C++Builder 6) For C++Builder (IntraWeb 7.0.x) ------------------------------- Install package files - IW7TMSGRIDC5.DPK (C++Builder 5) - IW7TMSGRIDC6.DPK (C++Builder 6) Install package files - IW7TMSGRIDDEC5.DPK (C++Builder 5) - IW7TMSGRIDDEC6.DPK (C++Builder 6) For C++Builder (IntraWeb 7.1.x) ------------------------------- Install package files - IW71TMSGRIDC5.DPK (C++Builder 5) - IW71TMSGRIDC6.DPK (C++Builder 6) Install package files - IW71TMSGRIDDEC5.DPK (C++Builder 5) - IW71TMSGRIDDEC6.DPK (C++Builder 6) For C++Builder (IntraWeb 7.2.x) ------------------------------- Install package files - IW72TMSGRIDC5.DPK (C++Builder 5) - IW72TMSGRIDC6.DPK (C++Builder 6) Install package files - IW72TMSGRIDDEC5.DPK (C++Builder 5) - IW72TMSGRIDDEC6.DPK (C++Builder 6) ---------------------------------------------------------- TMS IntraWeb Components Pro Script Edition for IntraWeb v6 ---------------------------------------------------------- For C++Builder (IntraWeb 6.0.x) --------------------------- Install package files - IW6TMSSEC5.DPK (Delphi 5) - IW6TMSSEC6.DPK (Delphi 6) - IW6TMSSEC7.DPK (Delphi 7) For C++Builder (IntraWeb 7.0.x) --------------------------- Install package files - IW7TMSSEC5.DPK (Delphi 5) - IW7TMSSEC6.DPK (Delphi 6) - IW7TMSSEC7.DPK (Delphi 7) For C++Builder (IntraWeb 7.1.x) --------------------------- Install package files - IW71TMSSEC5.DPK (Delphi 5) - IW71TMSSEC6.DPK (Delphi 6) - IW71TMSSEC7.DPK (Delphi 7) For C++Builder (IntraWeb 7.2.x) --------------------------- Install package files - IW72TMSSEC5.DPK (Delphi 5) - IW72TMSSEC6.DPK (Delphi 6) - IW72TMSSEC7.DPK (Delphi 7) ------------------------------------------ Installing the grid & menu gallery support ------------------------------------------ Create the directory: C:\Program Files\tmssoftware\TMSIWPRO\Preferences and copy the contents of the Gallery directory in this new directory, ie. C:\Program Files\tmssoftware\TMSIWPRO\Preferences\Grids C:\Program Files\tmssoftware\TMSIWPRO\Preferences\Menus Installing the Script Edition version with the TMS Component Pack ----------------------------------------------------------------- Remove the AdvMemo* files from the TMS IntraWeb Component Pack directory Remove references to AdvMemo* files from the IWxTMSSEDxx.DPK package file Add a reference to the TMSxx.DCP file to the requires list of the IWxTMSSEDxx.DPK package file ****************************************************** * * * I M P O R T A N T N O T E S * * * ****************************************************** TMS IntraWeb Components for IntraWeb v5.0.x require Intraweb v5.0.43 or higher ! TMS IntraWeb Components for IntraWeb v5.1.x require Intraweb v5.1.9 or higher ! TMS IntraWeb Components for IntraWeb v6.0.x require Intraweb v6.0.15 or higher ! TMS IntraWeb Components for IntraWeb v7.0.x require Intraweb v7.0.3 or higher ! TMS IntraWeb Components for IntraWeb v7.1.x require Intraweb v7.1.9 or higher ! TMS IntraWeb Components for IntraWeb v7.2.x require Intraweb v7.2.9 or higher !
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值