加载位图在柏林失败

时间:2017-01-20 18:35:15

标签: delphi bitmap firemonkey datasnap delphi-10.1-berlin

我在将流程从XE8迁移到柏林10.1时遇到问题。

在XE8上,它运行正常。

在柏林,我得到一个"加载位图失败"错误。

我有一个使用此方法的DataSnap REST服务器:

function TSM.Downloafile(): TStream;
var
  s: TFileStream;
begin
  s := TFileStream.Create('C:\image1.jpg', fmOpenReadWrite);
  Result := s;
end;

在XE8上,我得到的流很好,我可以在浏览器中使用URL看到图像,如:

  

http://localhost:105/datasnap/rest/TSM/Downloafile

在柏林,当我尝试显示图像时,我得到了这个字符串:

  

[122,216,255,244,0,15,......]

然后加载Bitmap失败。

2 个答案:

答案 0 :(得分:0)

我在网址中使用?json = false解决了这个问题,谢谢

答案 1 :(得分:-1)

当你说DataSnap REST服务器我想那么TSM.Downloafile():TStream;不是来自主线程的调用。位图不是多线程的,只能从主线程

使用