通过网盘分享的文件：webBroker_jQuery.rar
链接: https://pan.baidu.com/s/17klp5qKWF3KhV_z48w4Zew 提取码: 7bmh 

procedure TWebModule1.WebModule1DefaultHandlerAction(Sender: TObject;
  Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
var
aFile:tstringlist;
begin
aFile:=tstringlist.Create;
aFile.LoadFromFile('jquery-3.6.0.min.js');
  // 返回包含 jQuery 的 HTML 页面
  Response.Content :=
    '<html>' +
    '<head>' +
    '<title>WebBroker jQuery Example</title>' +
   // '<script src="https://code.jquery.com/jquery-3.6.0.min.js"></script>' +
    '<script>'+aFile.Text+'</script>' +
    '</head>' +
    '<body>' +
    '<h1>WebBroker jQuery 例子</h1>' +
    '<button id="loadData">Load Data</button>' +
    '<div id="result"></div>' +
    '<script>' +
    '$(document).ready(function() {' +
    '  $("#loadData").click(function() {' +
    '    $.ajax({' +
    '      url: "/data",' +
    '      method: "GET",' +
    '      success: function(response) {' +
    '        $("#result").html("Server Response: " + response.message);' +
    '      }' +
    '    });' +
    '  });' +
    '});' +
    '</script>' +
    '</body>' +
    '</html>';
  Handled := True;
  aFile.Free;
end;

procedure TWebModule1.WebModule1WebActionItem1Action(Sender: TObject;
  Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
  // 处理 AJAX 请求并返回 JSON 数据
  Response.ContentType := 'application/json; charset="UTF-8"';
  Response.Content := '{"message": "欢迎来到 WebBroker!"}';
  Handled := True;
end;