使用 IntraWeb (28)

TIWTemplateProcessorHTML //使用外部的 html 文件做模板
TIWLayoutMgrHTML         //直接輸入 Html 文本做模板
TIWLayoutMgrForm         //這應該只是內部使用的東西, 對用戶沒有意義

{需要把它們關聯到窗體的 LayoutMgr 屬性; 主模板需要通過 IWServerController.MasterTemplate 指定}

---

TIWTemplateProcessorHTML 所在單元及繼承鏈:
IWTemplateProcessorHTML.TIWTemplateProcessorHTML < TIWContainerLayout < TIWBaseContainerLayout < TIWBaseLayoutComponent < TIWVCLComponent < TComponent < TPersistent < TObject

主要成員:

---

property Enabled: Boolean       //使用或禁用模板, 默認 True
property MasterFormTag: Boolean	//是否使用主模板, 默認是 True; 如果要使用當前模板應該讓它是 False
property TagType: TIWTemplateLayoutHTMLTagType //ttBorland、ttIntraWeb(默認); 默認使用 {%控件名%} 嵌入控件, 如果選擇 ttBorland 則用 {#控件名#}
property Templates: TIWTemplateFiles //Templates.Default 默認指向 Templates\窗體名.html(如: IWForm1.html, 要求 Utf8格式), 也可以修改它(譬如動態變換模板時)
property RenderStyles: Boolean	     //?
property RemoveHiddenInputs: Boolean //移除隱藏控件, 默認 False
property MasterTemplate: string	     //也可以指定頁面級的主模板, 但一般沒必要

property OnUnknownTag: TIWUnknownTagEvent	  //處理沒有對應控件情況, 一般用於自定義標簽
property OnBeforeProcess: TIWTemplateProcessEvent //
property OnAfterProcess: TIWTemplateProcessEvent  //

function Able: Boolean		   //可通過該函數判斷模板是否可用
function TemplatePathname: string; //可獲取模板的詳細地址

//在模板中使用容器中的控件: {% 容器名.控件名 %} 

---

OnUnknownTag 事件測試:

---

//假如在模板中自定義了 {%BaiduLogo%}
procedure TIWForm1.IWTemplateProcessorHTML1UnknownTag(const AName: string; var VValue: string);
begin
  if AName = 'BaiduLogo' then
    VValue := '<img src="http://www.bkjia.com/uploads/allimg/140621/121240L52-0.gif"/>';
end;

---

TIWLayoutMgrHTML 所在單元及繼承鏈:
IWLayoutMgrHTML.TIWLayoutMgrHTML < TIWContainerLayout < TIWBaseContainerLayout < TIWBaseLayoutComponent < TIWVCLComponent < TComponent < TPersistent < TObject

主要成員:

---

property HTML: TStringList //

property OnUnknownTag: TIWUnknownTagEvent //

---