TImage rotieren

[Kevinpptx]

Hallo meine Lieben,

ich verzweifle seit Stunden. Ich muss ein TImage in Delphi (Windows VCL) rotieren. Mein Code:
#

Delphi-Quellcode:

unit UMain;
 
interface
 
uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.ExtCtrls, System.Diagnostics,
  Vcl.StdCtrls, pngimage, System.Math.Vectors;
 
type
  TForm1 = class(TForm)
    Timer1: TTimer;
    Label1: TLabel;
    Image1: TImage;
    procedure Timer1Timer(Sender: TObject);
    procedure FormActivate(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;
 
var
  Form1: TForm1;
 
implementation
 
{$R *.dfm}
 
procedure TForm1.FormActivate(Sender: TObject);
begin
  Image1.Picture.LoadFromFile(ExtractFilePath(Application.ExeName) + '\Bilder\auto-g.png');
  DoubleBuffered := true; // Verhindert Bildflackern jetzt muss noch das abhacken rechts verhindert werde
end;
 
procedure TForm1.Timer1Timer(Sender: TObject);
var a : integer;
begin
  a := strtoint(Label1.Caption);
  Inc(a);
  Label1.Caption := inttostr(a);
  Image1.Left := Image1.Left + 1;;
end;
 
end.

Ich benötige jetzt eine Prozedur, die mein Auto um eine beliebige Gradzahl dreht. Ich habe vieles versucht, auch die KI hat nicht geholfen. Ich kenne diesen Beitrag hier und diesen, aber das hilft mir alles nichts weiter, weil ich es nicht verstehe und daher nicht implementieren kann. Kann mir einfach jemand sagen, was ich konkret bei meinem Verwendungszweck coden muss, damit das funktioniert. Das Bild sollte auch danach transparent sein (mancher KI-Code hat funktioniert, aber nach der Rotation hatte das Bild die Transparenz verloren, deswegen die Erwähnung dieses Faktes).

Ich danke euch schonmal für die Hilfe. Die Lösung hier ist sehr wichtig, da es sich um mein Abschlussprojekt in der Schule handelt. Ich kann nicht verstehen, warum es in Delphi keine vorgefertigte Funktion gibt, um Sachen zu rotieren. Ich verwende Delphi 10.3.

Liebe Grüße