Delphi-Quellcode:
procedure JpegToBMP(JpegFileName: string; const OutBitmap : TBitmap);
var JPG: TJPEGImage;
begin
JPG := TJPEGImage.Create;
try
JPG.LoadFromFile(JpegFileName);
OutBitmap.Assign(JPG);
finally
JPG.free;
end;
end;
mit dem teil wird dann geprüft ob die datei sich am ort befindet oder wie ?
Delphi-Quellcode:
JpegToBMP('Der Name der JPG-Datei, die geladen werden soll', Image1.Picture.Bitmap);
hier mit wird dann das kpeg umgewandelt und als bmp ins image ? ? ?
wie krich ich das ganze jetzt in mein listbox procedure
gruss