Einzelnen Beitrag anzeigen

Benutzerbild von Zodi
Zodi

Registriert seit: 19. Jul 2017
Ort: Berlin
47 Beiträge
 
Delphi XE7 Ultimate
 
#1

Bitmap aus Stream lesen

  Alt 16. Jun 2018, 18:54
Hi Delphianer

Ich versende über die sockets ein bmp Bild.

Wenn ich die Daten empfange und in eine Datei schreibe und als .bmp abspeichere kann ich die Bilddatei anschauen.
Aber sobals ich den Stream in eine Timage lade wird nichts angezeigt.

Delphi-Quellcode:
    stream := tmemorystream.Create;
    stream.WriteBuffer(pointer(data)^,length(data));
    stream.Position := 0;

    assignfile(f, 'C:\00\testbild.bmp');
    rewrite(f);
    writeln(f, data);
    closefile(f);


 // Image1.Picture.LoadFromFile('c:\00\testbild.bmp');

      Image1.Picture.Bitmap.LoadFromStream(Stream);

  end;
Was mach ich da falsch das ich mit Image1.Picture.Bitmap.LoadFromStream(Stream); nichts angezeigt bekomme?

Grüsse Zodi
Pascal
  Mit Zitat antworten Zitat