Thema: Delphi Image erscheint gedreht

Einzelnen Beitrag anzeigen

OsCor

Registriert seit: 1. Jan 2009
Ort: Kenzingen, Südbaden
99 Beiträge
 
Delphi 10.4 Sydney
 
#1

Image erscheint gedreht

  Alt 20. Jan 2022, 20:52
Delphi-Version: 10.4 Sydney
Mir gehen die Fragen nicht aus:
In einem Formular möchte ich ein Foto (jpg) darstellen - in einem Image-Control. Klappt prima, aaaaber nur, wenn ich das Bild vorher in irgendeinem Bildbearbeitungsprogramm geöffnet (nur geöffnet!) und dann bearbeitet oder unverändert wieder abgespeichert habe. Wenn ich das nicht tue, wird das Bild um 90° gedreht angezeigt.
In der Eigenschaftenanzeige im Windows-Explorer werden die Seitenverhältnisse korrekt angezeigt. Wieso also dreht Delphi die Bilder, wenn sie im Originalzustand aus der Kamera kommen?
Laden tue ich sie so:
Delphi-Quellcode:
procedure TForm1.bEVClick(Sender: TObject);
begin
  if OpenPictureDialog1.Execute then
  begin
    EtikettV := OpenPictureDialog1.FileName;
    imEV.Picture.LoadFromFile(EtikettV); //OpenPictureDialog1.FileName);
  end;
end;
Gruß
Oswald
  Mit Zitat antworten Zitat