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 ado 动态建立.mdb数据库，表

Delphi替换字符串中的单引号

Delphi以鼠标为中心缩放图片以及拖动（采用区域抠图拉伸的方式）

Delphi 让程序只运行1次

Delphi整理七（function and procedure）

winapi 字符及字符串函数(9): lstrcat - 合并字符串

Delphi编程之系统oem diy

Delphi基于高斯-拉普拉斯算子的图像边缘检测

Delphi opendialog文件多选

Delphi 下 vclzip控件的简单使用

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

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