12-07-2017, Saat: 14:01
Merhaba,
Resmin öncede resim orijinal boyutunu ve yeni boyutunu bir klasöre alıyorum.
Aşıdaki kodlarla ise listviewe resimleri alıyorum, fakat bir kısıntı oluşuyor remin ojninal hali ile listview alırsam resim sadece bir bölümü listviewde görülüyor, boyutlandırılmış haliyle almak istediğimde ise JPEG error #53 hatası alıyorum bunu nasıl çözebilirim?
Resmin öncede resim orijinal boyutunu ve yeni boyutunu bir klasöre alıyorum.
Aşıdaki kodlarla ise listviewe resimleri alıyorum, fakat bir kısıntı oluşuyor remin ojninal hali ile listview alırsam resim sadece bir bölümü listviewde görülüyor, boyutlandırılmış haliyle almak istediğimde ise JPEG error #53 hatası alıyorum bunu nasıl çözebilirim?
function TForm2.UrunImage(const StrImage: String): Boolean; var Bmp: TBitmap; Jpg: TJpegImage; ResimAdres: String; begin try ResimAdres := IMGFile + '\' + StrImage + 'k.jpg'; if FileExists(ResimAdres) then begin Bmp := TBitmap.Create; Jpg := TJpegImage.Create; Jpg.LoadFromFile(ResimAdres); Bmp.Assign(Jpg); ListeleImage.Add(Bmp, Bmp); end; finally Bmp.Free; Jpg.Free; end; end;
Hayat bazen güzel olabiliyor.