你可以直接在 Delphi 中使用asm代码块调用JavaScript代码：

procedure TForm2.WebButton1Click(Sender: TObject);
var
  AlertText: String;
begin
  AlertText := WebEdit1.Text;

  asm
    alert(AlertText);
  end;
end;

这将工作，可以看到下面的截图：

下面是另一个使用换行符的例子：

procedure TForm2.WebButton1Click(Sender: TObject);
var
  AlertText: String;
begin
  AlertText := WebEdit1.Text;

  asm
    alert('Your entered text is: \n\n' + AlertText);
  end;
end;

TMS Web Core有三个全局变量，您可以使用它们来访问JavaScript中document、window和console对象的常用功能。
下面是它们在Web单元中被声明为全局变量的方式：

var
  document: TJSDocument;
  window: TJSWindow;
  console: TJSConsole;

使用这些全局变量，您可以直接从 Delphi 代码访问这些对象中的大多数功能。
举例来说：

procedure TForm8.WebButton1Click(Sender: TObject);
begin
  document.title := 'Hello World!';
  window.alert(document.title);
end;