Fastreport Export
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
-
- Üye
- Mesajlar: 95
- Kayıt: 07 Eki 2010 03:55
Fastreport Export
Arkadaşlar Merhaba. Raporlama bileşeni olarak Fast Report kullanıyorum. query ile yaptığım sorgulamaları fast reporr üzerinden xls olarak export ettiğim zaman ole nesnesi olarak export ediyor ve rapordaki parasal alanlar üzerinde değişiklik yapamıyorum. fast report kullanmadan excel ortamına aktardığım zaman da query deki alanların tamamını aldığı için ve dizayn olmadığı için müşterinin talebine uygun olmuyor benim sorum fastreport da gösterdiğim tasarımın aynı şekilde parasal alanlarda değişiklik yapabileceğim şekilde nasıl export yapabilirim...
Re: Fastreport Export
fastreport ta bunun bir yöntemi yok malesef yapabileceğin en iyi şey eğer cxgrid kullanıyorsan Exportgrid özelliği ile excel e çıkartacaksın Fastreportta Ole olarak verir
Soru Sorarken yazmaya Üşenmeyen Parmaklar Sorunun Çözüldükten Sonra Teşekkür etmeye de Üşenmesin.
Re: Fastreport Export
Ben aşağıdaki şekilde kullanıyorum ekranda gördüğüm formatın aynısını excel veya pdf olarak alıyorum belki faydası olur.
fr3 rapor dosyasını dizayn ediyorum.tasarım dosyasındaki en boy alanlarının displayformat bolumunden decimal 2 kind fknumeric tousend sperator , olarak ayarlıyorum. raporu önce gridde gösteriyorum sonra
excel de aktarılan en ve boy alanları ile hesaplamalar yapabiliyorum.
fr3 rapor dosyasını dizayn ediyorum.tasarım dosyasındaki en boy alanlarının displayformat bolumunden decimal 2 kind fknumeric tousend sperator , olarak ayarlıyorum. raporu önce gridde gösteriyorum sonra
Kod: Tümünü seç
// griddeki bilgileri aşağıdaki şekilde rapor dosyasındaki ilgili alanlara gönderiyorum.
(akis_rapor.FindObject('akis_en') as Tfrxmemoview).Memo.Text := akis_grid.Cells[5,akis_dataset.RecNo];
(akis_rapor.FindObject('akis_boy') as Tfrxmemoview).Memo.Text := akis_grid.Cells[6,akis_dataset.RecNo];
// rapor tasarım dosyası yükle
akis_rapor.LoadFromFile(cal_yol+'data\Rapor\akisrap.fr3',true);
//radio gruptan hangisi secili ise oraya raporu gönderiyorum.
if cikar.ItemIndex=0 then akis_rapor.ShowReport (true) ; // true hafızadaki son raporu siler
if cikar.ItemIndex=1 then akis_rapor.Print;
if cikar.ItemIndex=2 then akis_rapor.Export(pdfaktar) ;
if cikar.ItemIndex=3 then akis_rapor.Export(xlsaktar) ;
if cikar.ItemIndex=4 then akis_rapor.Export(mailaktar) ;
"…De ki: "Hiç bilenlerle bilmeyenler bir olur mu? Şüphesiz, temiz akıl sahipleri öğüt alıp-düşünürler" (Zümer Suresi, 9)