Welkom bij de Tweaking4All gemeenschapsforums!
Voor je gaat deelnemen, bekijk de Forum Regels!
Specifieke onderwerpen: Start het onderwerp met de naam van het programma of systeem.
Bijvoorbeeld “MacOS X – Jouw vraag“, of bijvoorbeeld “MS Word – Jouw Tip of Truc“.
Merk op: Omschakelen naar een andere taal zal niet werken als je een post aan het lezen bent aangezien er waarschijnlijk geen vertaling beschikbaar is.
[Opgelost] Delphi - JPEG/JPG inladen in een TBitmap
Delphi, Lazarus, Free Pascal
(@hans)
Famed Member Admin
Deelgenomen: 12 jaar geleden
Berichten: 2864
Topic starter
29 augustus 2013 23:04
Delphi staat het toe om een JPEG/JPG in te laden in een TImage, maar helaas niet in de TBitmap van de TImage.
Om een JPEG correct in te laden zodat je de TBitmap kunt bewerken gebruik je de volgende code (je hebt de unit jpeg nodig - standaard met Delphi meegeleverd, aan de de uses-clausule toevoegen):
var
JPEG1 : TJepegImage;
...
JPEG1:=TJpegImage.Create;
JPEG1.Performance:=jpBestQuality;
JPEG1.LoadFromFile(FileName);
Image1.Picture.Bitmap.Assign(JPEG1);
...