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 模仿qq截图

Delphi float转换int

Delphi xp 之后, Delphi 动注册表不方便了...逼出来一个办法:

Delphi 基础计算两数之合

Delphi 10.3.1 android沉浸式透明状态栏

Delphi xe5 android获取手机联系人，并用listview显示

Delphi web格式与tcolor类型的转换函数

Delphi 判断com端口是否存在

Delphi xe增强的rtti妙用－－动态创建包中的窗口类

Delphi 有关debughook

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

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