使用 IntraWeb (32) - Url 映射与 THandlers

最简单的 Url 映射是使用 TIWAppForm 的 class 方法: SetURL;

THandlers 是 IntraWeb XIV 新增的内容处理器, 它能完成的不仅仅是 Url 映射.

THandlers 通过虚拟路径、虚拟文件名, 可以转到或处理任何文件.

这个过程中会用到一个 TContentBase 类型的参数, TContentForm、TContentRedirect 是它的子类; 有时会需要从 TContentBase 继承出解决更多问题的子类.


THandlers 所在单元及继承链:
IW.Content.Handlers.THandlers

主要成员:


{添加到内容处理器: aPath: 虚拟路径; aDocument: 虚拟文件夹名; aHandler: 要添加的内容}
class function Add(const aPath: string; const aDocument: string; aHandler: TContentBase): TContentBase
class function Add(const aDocument: string; aHandler: TContentBase): TContentBase

{添加为首页}
class function AddStartHandler(const aPath: string; const aDocument: string; aHandler: TContentBase): TContentBase

class function GetStartHandler(aSession: TIWApplication): TContentBase

{添加对指定扩展名的统一处理}
class function AddForExtension(const aExt: string; aHandler: TContentBase): TContentBase

class function FindMatch(aFullPath: string): TContentBase
class procedure RegisterGetStartHandlerProc(aProc: TGetStartHandlerProc = procedure(aSession: TIWApplication; var aHandler: TContentBase) of object)

TIWAppForm.SetURL 方法应该用在 initialization 部分, 如:


{假如有三个窗体, 这是 Unit1 的部分代码:}
//...
procedure TIWForm1.IWButton1Click(Sender: TObject);
begin
  WebApplication.GoToURL(‘bbb.aspx‘);
//  WebApplication.GoToURL(‘abc/ccc.xxx‘);
end;

initialization
  TIWForm1.SetAsMainForm;
  TIWForm1.SetURL(‘‘, ‘aaa.html‘); //参数 1 是虚拟路径, ‘‘ 或 ‘/‘ 表示根路径; 参数 2 是虚拟文件名

end.

{这是 Unit2 的部分代码: -------------------------------------------}
//...
initialization
  TIWForm2.SetURL(‘/‘, ‘bbb.php‘); //名字是虚拟的, 不是真的 php 文件

end.

{这是 Unit3 的部分代码: -------------------------------------------}
//...
initialization
  TIWForm3.SetURL(‘/abc/‘, ‘ccc.xxx‘);

end.

{通过如上设置, 上面三个窗体就对应了下面三个网址(假定测试地址是: 127.0.0.1:8888)}
http://127.0.0.1:8888/aaa.html
http://127.0.0.1:8888/bbb.php
http://127.0.0.1:8888/abc/ccc.xxx

THandlers 测试一:


{代码主要写在 IWServerController 的 OnConfig 事件中, 下面是部分代码:}
uses
  IWInit, IWGlobal, Unit1, Unit2, Unit3, {Unit1-3 分别对应三个窗体}
  IW.Content.Handlers, IW.Content.Base, IW.Content.Form, IW.Content.Redirect; {THandlers、TContentBase、TContentForm、TContentRedirect 分别需要的单元}

{IWServerControllerBase.OnConfig 事件; 之前我是在 OnCreate 中测试的, 官方建议这些代码应该在 OnConfig 事件中}
procedure TIWServerController.IWServerControllerBaseConfig(Sender: TObject);
begin
  THandlers.Add(‘‘, ‘aaa.htm‘, TContentForm.Create(TIWForm1));
  THandlers.AddStartHandler(‘‘, ‘bbb.htm‘, TContentForm.Create(TIWForm2)); //纯属实验, 把 TIWForm2 设为首页
  THandlers.AddForExtension(‘.php‘, TContentForm.Create(TIWForm3));        //只要访问 *.php 的页面, 就转到 TIWForm3
  THandlers.Add(‘‘, ‘ccc.htm‘, TContentRedirect.Create(‘xxx.html‘)); //假如在 wwwroot 下有 xxx.html, 那么访问 ccc.htm 就可以转到 xxx.html
end;

THandlers 测试二: 关于自定义的 TContentBase, 官方给出了这样的例子:


{自定义 TContentXML 的单元: -----------------------------------------------------------}
unit MyXml;

interface

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

type
  TContentXML = class(TContentBase)
  protected
    function Execute(aRequest: THttpRequest; aReply: THttpReply; const aPathname: string; aSession: TIWApplication; aParams: TStrings): Boolean; override;
  public
    constructor Create; override;
  end;

implementation

uses IW.Content.Handlers, IWMimeTypes;

constructor TContentXML.Create;
begin
  inherited;
  mFileMustExist := False;
end;

function TContentXML.Execute(aRequest: THttpRequest; aReply: THttpReply; const aPathname: string; aSession: TIWApplication; aParams: TStrings): Boolean;
begin
  Result := True;
  if Assigned(aReply) then
  begin
    aReply.ContentType := MIME_XML;
    aReply.WriteString(‘<xml>My xml content here</xml>‘);
  end;
end;

end.

{ServerController 单元的部分相关代码: --------------------------------------------------}
uses
  IWInit, IWGlobal, IW.Content.Handlers, MyXml;

{IWServerControllerBase.OnConfig 事件}
procedure TIWServerController.IWServerControllerBaseConfig(Sender: TObject);
begin
  THandlers.Add(‘‘, ‘XmlTest‘, TContentXML.Create);
end;

{Unit1 单元的部分相关代码: -------------------------------------------------------------}
procedure TIWForm1.IWButton1Click(Sender: TObject);
begin
  WebApplication.GoToURL(‘XmlTest‘);
end;

使用 IntraWeb (32) - Url 映射与 THandlers

时间: 2024-11-05 16:02:52

使用 IntraWeb (32) - Url 映射与 THandlers的相关文章

ASP.NET MVC 5 Web编程2 -- URL映射(路由原理)

本章将讲述ASP.NET MVC5 的路由原理,即URL映射机制. 简单点就是解释:为什么MVC在浏览器输入地址就能访问到类(或类中的方法)?这是怎么做到的?我自己可以通过.NET写出一个自己的MVC框架吗? 答案是:可以. 模拟URL映射 先来看一个Demo,在传统的.NET WebForms项目中,实现URL的拦截. 打开VS2013,新建一个“ASP.NET Web窗体应用程序”项目,并取名为Demo4URLRouting. 为了方便测试,注释掉Default.aspx页面的内容和模板引用

url映射 ccf (Java正则表达式解法)

问题描述 试题编号: 201803-3 试题名称: URL映射 时间限制: 1.0s 内存限制: 256.0MB 问题描述: 问题描述 URL 映射是诸如 Django.Ruby on Rails 等网页框架 (web frameworks) 的一个重要组件.对于从浏览器发来的 HTTP 请求,URL 映射模块会解析请求中的 URL 地址,并将其分派给相应的处理代码.现在,请你来实现一个简单的 URL 映射功能. 本题中 URL 映射功能的配置由若干条 URL 映射规则组成.当一个请求到达时,U

201803-3 URL映射

问题描述 URL 映射是诸如 Django.Ruby on Rails 等网页框架 (web frameworks) 的一个重要组件.对于从浏览器发来的 HTTP 请求,URL 映射模块会解析请求中的 URL 地址,并将其分派给相应的处理代码.现在,请你来实现一个简单的 URL 映射功能. 本题中 URL 映射功能的配置由若干条 URL 映射规则组成.当一个请求到达时,URL 映射功能会将请求中的 URL 地址按照配置的先后顺序逐一与这些规则进行匹配.当遇到第一条完全匹配的规则时,匹配成功,得到

django中“url映射规则”和“服务端响应顺序”

1.django搜索路径 使用 import 语句时,Python 所查找的系统目录清单. 查看方式: import sys print sys.path 通常无需关心 Python 搜索路径的设置,Python 和 Django 会在后台自动帮你处理好. 2.url匹配模式  基本结构: '^需要匹配的url字符串$' PS:实际上最终完整的url串是http://根路径:端口号/需要匹配的url字符串 系统自动添加的部分'http://根路径:端口号/' eg:url匹配模式:'^lates

urlMappings与URL映射

此配置节的作用就是往Web程序中添加URL的映射,从而达到用户访问映射后的URL(如/Page/AAA)也能访问到源URL(如/Page/PageAAA.aspx)的效果.这也是URL映射本来的作用. 详细配置如下 其中要启用这个URL映射的必须要把enabled设置成true,add和remove的url都是映射后的URL. 最开始鄙人是在WebForm中尝试,结果是成功的:然后担心在MVC下已经废弃了,最开始可能是某些原因导致映射不了,直接说找不到URL,后来估计打断点查看一下两个应用程序(

Spring MVC系列:(2)视图解析器、URL映射器、适配器

1.默认的URL映射器.适配器和视图解析器 SpringMVC提供了默认的URL映射器.适配器和视图解析器. 在上一文中,springmvc-helloworld.xml内容如下: <?xml version="1.0" encoding="UTF-8"?> <beans xmlns="http://www.springframework.org/schema/beans"     xmlns:mvc="http://

SpringMvc的Url映射和传参案例(转)

Springmvc的基本使用,包括url映射.参数映射.页面跳转.ajax和文件上传 以前学习的时候写的代码案例,今天整理笔记的时候找到了,很久没有来园子了,发上来当个在线笔记用吧,免的时间长了又忘了 package sy.controller; import java.io.File; import java.io.FileOutputStream; import java.io.IOException; import java.io.OutputStream; import java.io.

SpringMvc的Url映射和传参案例

Springmvc的基本使用,包括url映射.参数映射.页面跳转.ajax和文件上传 以前学习的时候写的代码案例,今天整理笔记的时候找到了,很久没有来园子了,发上来当个在线笔记用吧,免的时间长了又忘了 package sy.controller; import java.io.File; import java.io.FileOutputStream; import java.io.IOException; import java.io.OutputStream; import java.io.

Django之url映射

url映射的作用 根据Django的MTV模式,url的映射是根据用户输入或传送而来的url路径,来进行区分去执行相应的view函数来响应用户的操作. url映射的方式 Django项目的创建后,会自动创建和你项目名称相同的全局文件包,urls.py就在其中. urlpatterns = [ path('admin/', admin.site.urls), ] 这是Django自动添加的一条映射.我们的view函数在自己创建的app中,所以需要先引入app文件包中的views from blog