iw14.0.50来了,起名终于得以直接在地方栏输入url打开iw效用页面了;能够自由使用EasyUI等js框架了;呈现情势对话框也不再七绕八绕令人烦了;

起名 1率先本人另外注册了多个用户来拓展测试

implementation 

起名 2

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

 起名 3那正是大家想要的事物了!

{ TWxApi } 

上期从不放成果图呢!忘了=-=,那正是上次的果实图,textview里面会突显登陆的名字(这么些是暗许管理员帐号=-=)

示范代码已经释放!请移步应用delphi+intraweb实行微信开发1~4代码示例展开下载,虽为示例代码不过是从小编项目中移出来的,封装很齐全适于自行扩充和改动。

起名 4对了,还要钦点共享名字,并把用户进入组成员中!

constructor TWxApi.Create; 
begin 
  inherited
  // 文件不需求真正存在 
  FileMustExist := False; 
end

行吗,登陆了服务器大家就有了相互的效果啦能够说是前进了第一次全国代表大会步呢!下边能大家就要试试从服务器拿一些数据打字与印刷出来(服务器定义的群组)

type 
  /// <summary> 
  ///
从TContentBase继承下来的类,就一定于asp.net中的httphandler
 
  /// </summary> 
  TWxApi = class(TContentBase) 
  protected 
    function Execute(aRequest: THttpRequest; aReply: THttpReply; const aPathname: string; aSession: TIWApplication; aParams: TStrings): Boolean; override
  public 
    constructor Create; override
  end

那就从头吧。

1、新建一个iw工程,选取Stand Alone Server /
Service 
,那种形式下实行支付是最地道的,调节和测试很有益,正式公布时方可再建立3个library型的工程公告到.net服务器上。(是的,大家没有看错,现在iw已经脱离了isapi形式,能够像布署.net
mvc4应用相同布置到iis上,前面会分解,.net虚拟主机也能够宣布iw应用了!巨大的腾飞。)

那就完事了大家和服务器交互的第一步!,我们得到了服务器的组数据!

 

 1       public static void findMan(){
 2               System.out.println("--------find start----------");
 3               Roster roster = connect.con.getRoster();        //Roster表示一个用户的所有好友清单以及申请加好友的用户清单
 4              Collection<RosterGroup> entriesGroup = roster.getGroups();//获得组信息
 5              System.out.println("team:"+entriesGroup.size());     
 6              for(RosterGroup group: entriesGroup){
 7                  Collection<RosterEntry> entries = group.getEntries();
 8                  System.out.println("--------groupName--------"+"\n"+group.getName());//循环打印组名和人名
 9                  for (RosterEntry entry : entries) {
10                      System.out.println("name:"+entry.getName());
11                  }
12             }
13              System.out.println("--------find end--------");
14            
15            16 }
17 
18 完成了这些我们在子活动里调用这个函数就能打印我们想要的东西了!

欢悦过了,来尝试一下啊。其实iw的坑还是挺多的,纵然已经接近主流了,但是,前面逐步都会说到…

起名 5

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

起名 6还创办了3个组(原谅本人起名的猥琐)

function TWxApi.Execute(aRequest: THttpRequest; aReply: THttpReply; 
  const aPathname: string; aSession: TIWApplication; 
  aParams: TStrings): Boolean; 
var 
  signature: string
  timestamp: string
  nonce: string
  echostr: string
  strs: TStringList; 
  tmpStr: string
begin 
  Result := True; 

随着在工具类里面写三个findman()函数用来查找组和打字与印刷组:

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

 

 

  

interface 

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

uses 
  ServerController, UserSessionUnit, Crypt.SHA1; 

uses 
  Classes, IW.Content.Base, System.SysUtils,HTTPApp, IWApplication, 
  IW.HTTP.Request, IW.HTTP.Reply; 

iw14.0.50来了,在新的版本中最吸引作者的就是充实了完美的httphandler功效:终于能够间接在地点栏输入url打开iw作用页面了;能够肆意使用EasyUI等js框架了;显示情势对话框也不再七绕八绕令人烦了;呵呵,笔者备感iw第③回类似主流web开发工具了!

发表评论

电子邮件地址不会被公开。 必填项已用*标注

网站地图xml地图