Einzelnen Beitrag anzeigen

Benutzerbild von jaenicke
jaenicke

Registriert seit: 10. Jun 2003
Ort: Berlin
9.648 Beiträge
 
Delphi 11 Alexandria
 
#6

AW: TImage rotieren

  Alt 10. Dez 2024, 21:49
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.
Sebastian Jänicke
AppCentral
  Mit Zitat antworten Zitat