fastreporttan excel'e aktarım

[true_false]

merhabalar formda bahsi geçmişmi diye baktım ama bulamadım. fast reporttan excele çıktı alabilirmiyiz.

[husonet]

Evet alabilirsiniz Demolarında örnekleri var.

Kolay Gelsin...

[Fatih!]

http://www.delphidunyasi.com/forum_post ... D=406&PN=1

[true_false]

Kod: Tümünü seç

GrowerFieldPortionForm.frReport1.ExportTo(frOLEExcelExport1,'c:\deneme');

bu kod program içerinde çalışıyor ama bu dosyayı açamıyorum ?

[selman]

selam
frxXMLExport1 bileşeninimi kullanıyon exele aktarmak için Kolay gelsin

[Fatih!]

Kod: Tümünü seç

frxXLSExport1.ShowDialog:=False;
frxXLSExport1.FileName:='C:\Deneme.xls';
frxXLSExport1.OpenExcelAfterExport:=True;
frxReport1.PrepareReport(false);
frxReport1.Export(frxXLSExport1);

[true_false]

Kod: Tümünü seç

frxXLSExport1.ShowDialog:=False;
frxXLSExport1.FileName:='C:\Deneme.xls';
frxXLSExport1.OpenExcelAfterExport:=True;
frxReport1.PrepareReport(false);
frxReport1.Export(frxXLSExport1);

bende frxXLSExport compenantı yok bunun için işimi frOLEExcelExport1 compenanatı ile hallediyom sorunuda çözdüm ama excel de açtığımda hücreler çok bitişik ve sıkıştırılmış gerçi yazılanlar anlaşılıyor ama görüntü güzel olmuyor bu konu hakkında yardım edebilirseniz sevinirim.

Kod: Tümünü seç

   begin
   try
   JvSaveDialog1.FileName := JvDirectories1.CommonDesktop + 'raporlar';
   JvSaveDialog1.Filter := 'Excel Dosyaları (*.XLS)|*.XLS';
    if JvSaveDialog1.Execute then
    GrowerFieldPortionForm.frReport1.ExportTo(frOLEExcelExport1,JvSaveDialog1.FileName);
    MessageDlg('Aktarım İşlemi Tamamlandı',mtInformation,[mbOK],0);
    except
    MessageDlg('Aktarımda Hata oldu Dosya Kullanımda Olabilir',mtWarning,[mbOK],0);
    end;

   end;

[Fatih!]

viewtopic.php?t=8532&highlight= bunu dene.

[true_false]

bu kod işime yaramaz
ilgin ve alakan için çok teşekkür ederim