delphi XE webbroker 开发,解决 Response 返回中文乱码问题


procedure TWebModule1.WebModuleBeforeDispatch(Sender: TObject;
  Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
Response.ContentType := 'text/html;charset=GB2312'; //解决 Response 返回中文乱码问题
  if FServerFunctionInvokerAction <> nil then
    FServerFunctionInvokerAction.Enabled := AllowServerFunctionInvoker;
end;

联系电话:
020-00000000
联系电话:
020-00000000
联系电话:
020-12345678