mettre plusieur image dans un tmemorystream

Question

Bonjour, comme le titre l indique, je souhaite mettre plusieurs imagse dans un stream, mais je sais pas comment m y prendre!

quelqu'un pourrait m expliquer comment faire!

merci

f0xi · Answer

quel sera le format d'image ? bitmap ? jpeg ? png ? ou un peu de tout ?

car selon le format il y aura plusieurs techniques differentes

<hr size="2" width="100%" />

Guillemouze · Answer

pour un bitmap simple:

var
  s: TMemoryStream;
begin
  s := TMemoryStream.Create;
  image1.Picture.Bitmap.SaveToStream(s);
  image2.Picture.Bitmap.SaveToStream(s);
  s.Position := 0;
  image3.Picture.Bitmap.LoadFromStream(s);
  image4.Picture.Bitmap.LoadFromStream(s);
  s.Free;
end;

cs_cc59 · Answer

merci guillemouze, dsl de pas répondre avant, j'avais fini par trouver mais j avoue que ta méthode est plus simple

voici une autre solution

            ImageStream := TMemoryStream.Create();
            ImageStream1 := TMemoryStream.Create();
            ImageStream2 := TMemoryStream.Create();

            JpegImage.Assign(BMP);
            JpegImage.SaveToStream(ImageStream1);

            PNGstreaming.Assign(BMP);
            PNGstreaming.SaveToStream(ImageStream2);

            imagestream.CopyFrom(ImageStream1,0);
            imagestream.CopyFrom(ImageStream2,0);

Mettre plusieur image dans un tmemorystream

3 réponses

Votre réponse

Discussions similaires