Ver Mensaje Individual
  #5  
Antiguo 23-10-2020
Avatar de movorack
[movorack] movorack is offline
Miguel A. Valero
 
Registrado: feb 2007
Ubicación: Bogotá - Colombia
Posts: 1.346
Reputación: 20
movorack Va camino a la famamovorack Va camino a la fama
Hola, ya que especificas que el formato es JPEG. puedes cargar la foto a un TJPEGImage

Código Delphi [-]
uses
  .. JPEG;

procedure TForm1.VerFoto(Foto: TArray< System.Byte >; Image: TImage);
  var
    JPEGImage: TJPEGImage;
    AStringStream: TStringStream;
begin
  AStringStream := TStringStream.Create(StringOf(Foto));
  JPEGImage := TJPEGImage.Create;
  try
    AStringStream.Position := 0;
    JPEGImage.LoadFromStream(AStringStream);
    Image.Picture.Assign(JPEGImage);
  finally
    JPEGImage.Free;
    AStringStream.Free;
  end;
end;
__________________
Buena caza y buen remar... http://mivaler.blogspot.com
Responder Con Cita