DataSnap Rest Delphi10

[vtrx 0]

Aprendi a usar DataSnap Rest,no Delphi 10,usando o banco Firebird com Zeos,no lado server,deste modo não alterei a estrutura de chamadas e dados que ja tenho.
No lado client,usei uma chamada simples que retorna a quantidade de registros para poder testar a conexão remota e esta ok.
Recebo o dados do server assim;

Label1.Text:=ClientModule1.ServerMethods1Client.Total;

Agora como carregaria uma imagem que tenho gravado no banco?
No programa original usado no Windows,a imagem é carregada assim;

var
Stream: TStream;
jpgImagem: TJPEGImage;
begin
jpgImagem := TJPEGImage.Create;
With datamodule2.ZQuery1 do
Begin
Sql.Clear ;
Sql.Append('Select FOTO from TABELA ');
Sql.Append('WHERE CODIGOS='+QuotedStr(Str));
Open;
Stream := CreateBlobStream(FieldByName('FOTO'),bmRead);
end;
try
jpgImagem.LoadFromStream(Stream);
image1.Picture.Assign(jpgImagem);
finally
jpgImagem.Free;
Stream.Free;
end;

Como seria utilizando um modo simples,como foi a do retorno da quantidade de registros?

[vtrx 0]

Resolvido.