02 Stimmen

Delphi: JPEG Bild in TBitmap laden

Tutorial von Delphianer | Letztes Update am 13.05.2021 | Erstellt am 16.07.2012

Heute möchte ich euch zeigen, wie ihr ein JPG-Bild aus einer Datei in eine TBitmap in Delphi ladet, zum Beispiel um diese danach weiterzubearbeiten.

Oben in unserer Unit müssen wir hinter "uses" die Unit "JPEG" hinzufügen:

uses Windows, ... ,JPEG;

Und hier ist unser Code, der unsere JPG läd und in die Bitmap speichert:

procedure TForm1.Button1Click(Sender: TObject);
var
   jpg: TJpegImage;
   bmp: TBitmap;
begin
   jpg := TJpegImage.Create;
   jpg.LoadFromFile('C:\bild.jpg');

   bmp := TBitmap.Create;
   bmp.Assign(jpg);

   // Bildbearbeitung

   bmp.free;
   jpg.free;
end;

Zunächst erzeugen wir ein neues, leeres JPG-Bild und laden mit LoadFromFile eine beliebige Datei in unser Bild.

Anschließend erzeugen wir eine leere Bitmap und können mit Assign unser JPG in die BMP laden.

Danach können wir alle gewünschten Bearbeitungen vornehmen und dürfen anschließend nicht vergessen "bmp" und "jpg" wieder freizugeben.

AntwortenPositivNegativ

Über den Autor

AvatarDer Autor hat keine Kurzbeschreibung seines Profils angegeben.
Profil anzeigen

 

Ähnliche Themen

Wichtiger Hinweis

Bitte beachten Sie: Die Beiträge auf askingbox.de sind Beiträge von Nutzern und sollen keine professionelle Beratung ersetzen. Sie werden nicht von Unabhängigen geprüft und spiegeln nicht zwingend die Meinung von askingbox.de wieder. Mehr erfahren.

Jetzt mitmachen

Stellen Sie Ihre eigene Frage oder schreiben Sie Ihren eigenen Artikel auf askingbox.de. So gehts.