TImage rotieren

[jaenicke]

Wie ich schon schrieb gibt es durchaus fertige Lösungen, falls diese zur Aufgabenstellung passen. Man kann z.B. über die Windows API mit SetWorldTransform und einer Transformationsmatrix arbeiten. Die einfachste Variante ist aber das ebenfalls erwähnte FMX zu verwenden. Das geht auch in einer VCL Anwendung.

Delphi-Quellcode:

uses
  FMX.Graphics;

var
  Img: FMX.Graphics.TBitmap;
begin
  Img := FMX.Graphics.TBitmap.Create;
  try
    Img.LoadFromFile('C:\Temp\test.bmp');
    Img.Rotate(100);
    Img.SaveToFile('C:\Temp\test_rotated.bmp');
  finally
    Img.Free;
  end;
end;

Statt 100 trägst du den gewünschten Winkel ein.