2014-05-06 22:46 1521人阅读 评论(0) 收藏 举报
分类:
当你使用文件流对象从Delphi的REST服务器返回图像时,它不会正常显示在浏览器中,如下例:
-
function TServerClass.Image: TFileStream;
-
begin
-
Result := TFileStream.Create('pathtofile\image.png', fmOpenRead or fmShareDenyNone);
-
end;
这是因为Delphi REST服务器总是将返回内容的类型设置为text/html,这就导致你返回其它类型时浏览器不能加以区分,这是一个bug,因为大多数的返回内容为json,这就意味着返回内容的类型应该为applicatilon/json。所幸在服务器方法中我们可以改写返回内容的类型。
为此你需要引用"Data.DBXPlatform"单元,它包含一个名为GetInvocationMetadata的方法,它能够访问目前正在构建的返回响应对象,它返回一个TDSInvocationMetadata对象,它有一个名为ResponseContentType的属性。设置这个属性将会改写HTTP响应容的头部Content-Type的值。上面的例子可以改写为
-
function TServerClass.Image: TFileStream;
-
begin
-
Result := TFileStream.Create('pathtofile\image.png', fmOpenRead or fmShareDenyNone);
-
GetInvocationMetadata.ResponseContentType := 'image/png';
-
end;
现在,返回的图像就可以在浏览器中正常显示了。
http:///questions/13879238/return-an-image-from-a-delphi-rest-server-and-show-it-in-a-browser/13879240#13879240
|