Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
Resim orjinal ve boyutlandırmada
#1
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?




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.
Cevapla
#2
Boyutlandırdığınız hali jpg değil büyük ihtimal notepad ile açıp bir bakın

“Do. Or do not. There is no try.”
Cevapla


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  lazreportda resim gosterme sadikacar60 0 181 14-12-2024, Saat: 20:08
Son Yorum: sadikacar60
  Excel tablosuna resim ekleme enigma 3 797 21-05-2024, Saat: 12:16
Son Yorum: enigma
  dxRichEditControl Resim Kaydı m_ekici 0 392 31-10-2023, Saat: 01:42
Son Yorum: m_ekici
  Formda acmadan resim dosyasi renk pixelleri almak sadikacar60 1 622 27-06-2023, Saat: 08:01
Son Yorum: delphiman
  Toplu Resim Kaydetme gonulali 2 911 26-09-2022, Saat: 22:51
Son Yorum: mustafaozpinar



Konuyu Okuyanlar: 1 Ziyaretçi