응답 객체의 CustomHeaders 속성을 사용하여 HTTP.SYS 서버의 응답을 사용자 정의할 수 있습니다.
Header Name과 Header Value를 개행 문자로 구분하여 CustomHeaders 값을 설정하십시오.
예제: 다음 헤더를 추가하려면 아래 샘플 코드를 확인하십시오
Access-Control-Allow-Origin: *
Acces-Control-Allow-Methods: GET, POST, OPTIONS, PUT, PATCH, DELETE
procedure OnHTTPRequest(aConnection: TsgcWSConnection_HTTPAPI; const aRequestInfo: THttpServerRequest;
var aResponseInfo: THttpServerResponse);
begin
aResponseInfo.ResponseNo := 200;
aResponseInfo.CustomHeaders := 'Access-Control-Allow-Origin: *' + #13#10 + 'Acces-Control-Allow-Methods: ' +
'GET, POST, OPTIONS, PUT, PATCH, DELETE';
end;