首页 > 其他分享 >Delphi 12.2 新增的 WebStencils 尝鲜

Delphi 12.2 新增的 WebStencils 尝鲜

时间:2024-09-29 18:48:32浏览次数:3  
标签:WebStencils 里面 HTML Delphi 12.2 html 代码 页面

WebStencils 是 Delphi 新增的服务器端 WEB 控件

 这个玩意怎么用,用起来有意义吗?

试试才知道。以下测试的描述都是基于 Delphi WebBroker 这个 WEB 服务器端框架。

最新出来的,各方面资料很少,官方也没有详细文档,只能自己摸索。

网上我能够搜到的相关资料:

corneliusdavid/webstencils-demo: a couple of Delphi WebBroker programs to compare PageProducers with new WebStencils (github.com)

WebStencils - RAD Studio (embarcadero.com)

初步试探总结

在页面 HTML 代码里面可以嵌入 Delphi 的对象或者 DataSet

这个有本文上述的 github 链接里面的例子代码。

如何让页面代码组件化

这个是我最关心的问题。

比如,有 10 个页面。假设 10 个页面分为两组,每一组的页面的 <head></head> 部分是相同的。如果 10 个页面文件都复制粘贴上相同页面代码,就很土气。应该把相同的部分,单独写在一个文件里面,需要使用的页面,仅仅只需要引用这个文件就好了。

另外,页面的页头,抬头的 Banner 部分,菜单部分,可能也是多个页面是相同的。

另外,页面的页脚部分,可能也是很多页面相同。

都有类似的情况。

写 Delphi 代码的人,当然想把相同的代码抽离出来,放到一个函数里面。如果函数太复杂,那就搞一个类。其它需要这个代码的地方,调用这个函数,或者这个类就好了。

使用传统的 PageProducer 的方法

解决上述问题,在 12.2 之前的 Delphi 版本中,在页面代码需要嵌入一个外部文件的地方,写上一个 Tag 字符串,比如:<#MyPageHead>。然后在 Delphi 的代码里面,使用一个 PageProducer 来加载这个页面,在 PageProducer.OnTag 事件方法里面,写代码,根据对应的 Tag 字符串,把内容换成需要的字符串(比如,这个字符串是加载的一个外部 HTML 或者 TXT 文件,也就是一个页面组件)。

这样做的问题是:如果有很多页面,页面里面有很多组件需要用 Tag 方式替换,服务器端的 Delphi 代码就要写很多。没什么技术含量,就是代码多,很累。

PageProducer 把页面的各个组件都装配好以后,程序使用:

Response.Content := PageProducer1.Content;

就可以把服务器端渲染好的页面代码发送给浏览器。

使用 WebStencils 的方法

类似 PageProducer ,设计期拖一个 TWebStencilsProcessor 到 WebModule1 里面,就可以开始使用它了。注意:这里必须还要有一个【引擎】控件,TWebStencilsEngine

假设我要输出 index.html 页面给浏览器,只需要:

WebStencilsProcessor1.InputFileName := 'index.html';
Response.Content := WebStencilsProcessor1.Content;

到这里,服务器端的 Delphi 代码就写完了。

至于在 Index.html 里面,组装其它页面代码,方法很简单:

页面模板和页面内容

首先,有一个所有页面都要使用的页面模板,大概就是一个框架页面,比如:

<html>
<head>
  <style>xxxxxx</style>
  <link xxxxx />
</head>

<body>

@RenderBody

</body>

</html>

这个框架页面代码保存为 Temp.html;

然后我们的 index.html 页面这样使用框架页面,以下是 index.html 的代码:

@LayoutPage Temp.html
<div>
我的页面内容,显示给用户看的部分
</div>
这里的逻辑是:

1. WebStencilsProcessor1 的 InputFileName 是 index.html,它加载这个文件;

2. 它发现 index.html 里面有一个 @LayoutPage Temp.html,去加载 temp.html 这个框架页面。

3. 框架页面里面,有个 @RenderBody ,它在这里,把 Index.html 的内容放进去,最终形成一个完整的页面代码,作为 WebStencilsProcessor1.Content 输出。

其它页面组件怎么办

上面那个逻辑把我误导了。以为在其它地方要引入一个页面组件,也是类似的画个圈(@)的方式。尤其是本文前面提到的那个官方文档里面有说:

  • @ExtraHeader { ... }: Used within the specific HTML page to indicate a block of code to be added as extra header information.
  • @RenderHeader: Indicates in the template file (generally in the HTML head section) where to add the extra header of the page, if available

浪费我一个小时来回测试这个  RenderHeader,就是没效果。我怕是我打错字导致的,逐个字母用眼睛反复检查。怕我理解有错误,把这个 RenderHeader 和 ExtraHeader 反复在不同页面文件之间来回测试,不管哪个放到框架文件里面,都不行。

简单说,我的测试结果,上述玩意没有预期的输出结果。也查不到更多使用细节和方式。

最后发现文档里面还提到一个 @Import ,这个试试,发现,用它就对了。

注意:@Import 后面的文件名,必须是 .html 不能是 .txt 或者其它。

1. 把需要重复使用的页面 HTML 代码,抽出来单独保存为一个文件,我把它叫做一个 HTML 片段,一个 HTML 组件。

2. 在一个页面,需要这个组件的地方,使用 @Import 文件名.html 的方式。

以下是我测试成功的框架页面的代码:

<!DOCTYPE html>
<html lang="en">

@Import HTMLHeader.html


  <body>
    <!-- Header -->
    @Import PageHeader.html
    <!-- ./ Header -->

    <!-- Main -->
<main class="container">
    
       @RenderBody

  <!-- ./ Main -->
 </main>

    <!-- Footer -->

         @Import PageFooter.html

    <!-- ./ Footer -->
    
  </body>
</html>

One more thing

简单总结一下:

1. 使用一个框架页面,在需要装正式内容的地方,写上:@RenderBody;

2. 页面内容文件比如 index.html,不需要有页面框架代码诸如 <html> 等等,仅仅只需要提供页面显示内容。然后在文件开头把要使用的框架文件的名字写上去:@LayoutPage 框架.html;

3. 页面的其它地方的代码,需要引入其它外部文件的内容,使用 @Import 文件名.html 的方式。

问题来了:

我的页面组装正确了,也正确显示了。但我在页头里引用的 HTMX 的 javascript 没有起作用。用浏览器的开发者工具查看,发现提示是,这个 javascript 文件不存在。

把开发工具里面显示的这个 JavaScript 的 URL 拷贝出来,放到文本编辑器里面,和能够正常工作的页面里面的 URL 上下排在一起,逐个字母用眼睛对比看,发现了问题。原来那个 URL 里面有一个圈(@)符号。经过 WebStencilsProcessor1 处理后,那个圈没有了。

那个 HTMX 的引用如下:

<script src="https://unpkg.com/[email protected]" integrity="sha384-Y7hw+L/jvKeWIRRkqWYfPcvVxHzVzn5REgzbawhxAuQGwX1XWe70vji+VSeHOThJ" crossorigin="anonymous"></script>

这才想起官方文档里面有提到,如果需要一个圈,就来两个圈。

于是,把代码修改为:

<script src="https://unpkg.com/htmx.org@@2.0.2" integrity="sha384-Y7hw+L/jvKeWIRRkqWYfPcvVxHzVzn5REgzbawhxAuQGwX1XWe70vji+VSeHOThJ" crossorigin="anonymous"></script>

我靠,通过了。问题解决。

结论

想要少写重复代码,省掉复制粘贴,以及减少复制粘贴为未来的代码修改带来的麻烦,使用 WebStencilsProcessor1 还是很有意义的。更不要提还可以直接在页面的 HTML 代码里面访问 Delphi 的对象。再结合 HTMX,会让 Delphi 写 Web 服务器的代码架构更加的合理顺畅。

有人有兴趣的话,可以一起探讨。

各位,我写这文到夜里 1 点 50 分。看了感觉还行的话,给点个赞嘛。

标签:WebStencils,里面,HTML,Delphi,12.2,html,代码,页面
From: https://blog.csdn.net/pcplayer/article/details/142447016

相关文章

  • Delphi FastReport报表常用方法
    1.       单据中有多行数据,但预览时只显示部分内容,或者打印内容行与行之间有间隔FASTREPOR属性中:设置RowCount=0,StartNewPage为False;Stretched为True.说明: RowCount:控制总共打印几行;RowCount=0是打印全部;StartNewPage:打印前先跳页;每页打印一行;Stretch:表身自动......
  • Delphi fastreport 加天数
    Delphifastreport加天数在Delphi中使用FastReport加天数可以通过在报告脚本中使用TfrxExpressionFunction.Create来创建一个自定义函数,或者直接在报告脚本中使用现有的日期函数。以下是一个在FastReport脚本中添加天数的例子:varAddedDate:TDateTime;begin//......
  • Delphi10.3关键字自动填充完成AutoComplete
    声明两个全局变量varaStringList:TStringList;//读取关键字aMemoInput:string;//当前已输入项procedureTSearchReplaceDemoForm.FormCreate(Sender:TObject);beginaStringList:=TStringList.Create;aStringList.LoadFromFile('keyWord.txt');//从文件......
  • Borland license information was found, but it is not valid for Delphi.
    Delphi错误:Borlandlicenseinformationwasfound,butitisnotvalidforDelphi.YoucannotrunDelphiwithoutthisinformation.Clickthe'Exit'buttontoexitDelphi.Delphi错误:Borlandlicenseinformationwasfound,butitisnotvalidforDel......
  • 基于 Delphi 的家庭财务管理系统
    基于Delphi的家庭财务管理系统可以帮助用户跟踪家庭的收支情况,包括日常开销、收入、储蓄等信息。这样的系统通常包括账户管理、交易记录、预算规划和财务报告等功能。下面是一个简化版的家庭财务管理系统的设计方案及其代码示例。系统设计概览账户管理:记录不同账户的信......
  • 金融借贷管理软件-基于DELPHI的信息管理系统论文和源码
    !!!有需要的小伙伴可以通过文章末尾名片咨询我哦!!! ......
  • Weblogic 12c 12.2.1.10SPB 补丁文件 以及补丁升级
            最近公司项目上新接手了一个weblogic12的运维项目,小版本号码为12.2.1.1.0。为了安全稳定性,决定升级最新版补丁文件。   从oracle官网下载补丁(个人账户无法查看补丁以及下载),解压文件后发现目录文件与之前的补丁文件格式不一样,是一个SPB的补丁List。结构......
  • 【delphi】判断多显示器下,程序在那个显示器中
    在Delphi中,如果你的电脑连接了多个显示器,可以通过以下步骤判断某个程序在哪个显示器上运行。方法概述:获取程序窗口的位置(例如窗体的Left、Top坐标)。使用Screen.MonitorFromWindow函数来确定该窗口所属的显示器。关键概念:TMonitor:表示一个显示器,包含该显示器的边界(B......
  • 如何解决Delphi应用中的bass.dll错误?Delphi应用bass.dll错误解决教程,几步教你轻松解决
    在使用Delphi进行应用开发时,有时会遇到bass.dll错误,这可能会让开发者感到困惑和烦恼。不过,别担心,本文将为你提供一些实用的解决大法,让你轻松搞定bass.dll错误,不再为此发愁!首先,我们来了解一下bass.dll是什么。bass.dll是一个动态链接库文件,它是BASS(BeepAudioSystem)音频库的......
  • Delphi怎样安装和配置第三方控件并处理找不到文件
    一、提示信息:[dcc64Error]E1026Filenotfound:‘***.res’二、解决方法:1、正解:应当去看官方的安装说明文档,比如若你用自动或手动方式安装和部署TMSFlexCelStudioforVCLandFireMonkey*.*.*.*.exe时,你应当仔细阅读官方的安装说明:http://www.tmssoftware.biz/flexcel/d......