IdHTTPServer允许跨域访问

本文整理自网络，侵删。

 IdHTTPServer允许跨域访问

procedure TMain.idHttpServerCommandGet(AContext: TIdContext; ARequestInfo: TIdHTTPRequestInfo;  AResponseInfo: TIdHTTPResponseInfo);
begin
    AResponseInfo.CustomHeaders.Add('Access-Control-Allow-Origin:*');
    AResponseInfo.CustomHeaders.Add('Access-Control-Allow-Headers:*');
    AResponseInfo.CustomHeaders.Add('Access-Control-Allow-Method:*');
end;
 

相关阅读 >>

Delphi 根据进程pid获取程序所在路径的函数

Delphi createthread的线程传参数（小熊论坛的）

Delphi tthread线程同步

Delphi关于延迟时间的一点智慧

Delphi 移除u盘的两种方法

常用的几个网络函数和系统函数

Delphi exe执行程序dos参数的运用

Delphi读写utf-8、unicode格式文本文件

Delphi mysql里Delphi事件类型转unix时间戳

Delphi 基础学习指定字符替换其他字符

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

转载请注明出处：木庄网络博客 » IdHTTPServer允许跨域访问