delphi TMS WEB core 嵌入JS代码

本文整理自网络，侵删。

 
procedure TForm1.WebButton1Click(Sender: TObject);
begin
asm
    if (1>0) {
      alert("hello");
    }
 end;
 end;


//取得JS返回值
var
  s: string;
begin
  asm
     s = myJavaScriptProc();
  end;
end;
 

相关阅读 >>

Delphi监控指定进程防止被关闭

Delphi 颜色转换函数: 从 Delphi 到 html

Delphi出现 no mapping for the unicode character exists in the target multi-byte code page 处理方法

download 和 http downloader 源码

Delphi flash控件使用

Delphi - 右滚动文字

Delphi 递归遍历treeview树节点

Delphi firedac tfdconnection连接mysql数据库

Delphi 农历源码

Delphi 安卓动态申请权限清单类

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi TMS WEB core 嵌入JS代码