使用 Delphi 的 HTML5 画布动画

Posted 2023-02-16

【中文标题】使用 Delphi 的 HTML5 画布动画

【英文标题】：HTML5 canvas animation with Delphi

【发布时间】：2021-03-26 22:39:06

【问题描述】：

我需要在 Delphi 应用程序中替换 Flash 动画。到目前为止，我已经使用了TShockwaveFlash 组件来加载 SWF 文件。使用 Adob​​e Animate 将此 SWF 文件转换为 html 5 画布并更改了动作脚本的一些语法。

Adobe Animate 的输出如下：

.html
.js
images/.png

如何将这些集成到我的 Delphi 应用程序中以替换旧的 Flash 动画？在网络开发方面不是很有经验。

【问题讨论】：

我使用的是delphi 10.1版和vcl

您需要嵌入浏览器，例如带有TWebBrowser 组件。

您需要嵌入支持 HTML5 的网络浏览器。

【参考方案1】：

我们安装了WebView2 并使用了 TEdgeBrowser 组件。

在delphi中可以这样访问脚本部分：

var Script: string := componentname+'.Enable.gotoAndStop(0);'; EdgeBrowser1.ExecuteScript(脚本);