Resim yolu ile Quickrep yazdırma

[erdogan_ozkaya]

Arkadaşlar, basit bir haberler program yazdım, içinde resim olan "Resimler" diye bir klasörüm var. Programda resim adları kayıtlı Quickrep ile liste halinde haberleri ve resimleri yazdırmak istiyorum yardımcı olabilir misiniz.

not: resimleri veritabanına işlersem oluyor fakat resimler çoğalacağı için kısa sürede veritabanı şişecektir.

teşekkürler

[erdogan_ozkaya]

Çözüm çok basitmiş

Kod: Tümünü seç

procedure TForm1.QUERARSIV_DBAfterScroll(DataSet: TDataSet);
begin
  Form4.QRImage7.Picture.LoadFromFile(ExtractFilePath(Application.exename)+'Resimler\'+form1.QUERARSIV_DBRESIM_ADI.Text);

end;