加在http回應頭上 Access-Control-Allow-Origin * 這知道
怎么寫httpserver 回應頭？？
uj5u.com熱心網友回復：
替代得解決辦法 編譯為Apache或IIS模塊uj5u.com熱心網友回復：
procedure TServer.IdHTTPServerCommandGet(AContext: TIdContext; ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);var
cContext: TClientContext;
t: TSomeThread;
begin
// Beep;
// Sleep(10000);
t := TSomeThread.Create(true);
t.FreeOnTerminate := true;
t.Start;
AResponseInfo.ResponseNo := 200;
AResponseInfo.CacheControl := 'no-cache';
AResponseInfo.CustomHeaders.Add('Access-Control-Allow-Origin: *');
AResponseInfo.ContentText := 'ok';
AResponseInfo.ResponseNo := 200;
AResponseInfo.WriteContent;
end;
轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/37854.html
標籤：網絡通信/分布式開發