Konuyu Paylaş : facebook gplus twitter

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

Konuyu Paylaş : facebook gplus twitter



Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  URLDownloadToFileW api türkçe karakter resim indirmiyor. masteryoda 5 98 14-04-2018, Saat: 16:54
Son Yorum: barutali
  Resim üzerindeki nesnenin alanını hesaplama beklentili 4 192 31-03-2018, Saat: 16:23
Son Yorum: beklentili
  Veritabanı resim insert/update hinevi 4 200 07-03-2018, Saat: 22:05
Son Yorum: mcuyan
  Cxgrid Resim esrehmaan 4 372 28-10-2017, Saat: 22:57
Son Yorum: esrehmaan
  Varbinary(MAX) Tipindeki Resim Dosyalarını Timage Kolay Gösterim pro_imaj 4 375 19-10-2017, Saat: 15:02
Son Yorum: pro_imaj



Konuyu Okuyanlar: 1 Ziyaretçi