Image als Tbyte umwandeln

[Klaus01]

wenn Du das gedrehte BMP als jpg speichern willst musst Du das Bitmap einer jpg Instanz zuweisen. Die TJpegImage Klasse hat auch eine Methode um in einen Stream zu schreiben.

Delphi-Quellcode:

var
  jpg: TJpegImage;
  bmp: TBitmap;
  mStream: TMemoryStream;
begin
  try
    jpg := TJpegImage.Create;
    try
      bmp := TBitmap.Create;
      try
        // do something with bmp

        jpg.Assign(bmp);
        jpg.SaveToStream(mStream);
      finally
        bmp.Free;
      end;
    finally
      jpg.Free;
    end;

  except
    on E: Exception do
      Writeln(E.ClassName, ': ', E.Message);
  end;
end.

PS: ich weiß das der Memorystream nicht instantiiert ist.

Grüße
Klaus