線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1838
推到 Plurk!
推到 Facebook!

如何得到FastReport的總頁數

缺席
kuf41
中階會員


發表:14
回覆:45
積分:51
註冊:2006-12-03

發送簡訊給我
#1 引用回覆 回覆 發表時間:2010-03-09 09:43:36 IP:114.42.xxx.xxx 訂閱
[code delphi]
frxReport1.LoadFromFile('E:\Temp\Test\test.fr3');
frxReport1.PrepareReport;
frxReport1.Export(frxJPEGExport1);
[/code]

需求:
直接匯出jpg圖檔,有時資料超過1頁時,會有2個以上的圖檔,
需要抓到所有圖檔的檔名然後作為附件寄信出去

問題:
如何知道匯出了N個檔案,或共有N頁?
------
一切都為了明天
Victor4022
中階會員


發表:0
回覆:76
積分:90
註冊:2011-02-20

發送簡訊給我
#2 引用回覆 回覆 發表時間:2011-02-21 12:26:24 IP:210.68.xxx.xxx 訂閱
關鍵參數名稱: frxReport1.PreviewPages.Count

示意程式:
[code delphi]
var
sFileName : String;
begin
frxReport1.FileName := 'YourFileName.xxx';
frxReport1.LoadFromFile('E:\Temp\Test\test.fr3');
frxReport1.PrepareReport;
frxReport1.Export(frxJPEGExport1);

for I:=0 to frxReport1.PreviewPages.Count-1 do
begin
sFileName:= Format('%s.%d%s',[
frxReport1.FileName.FileName, I 1, 'your file ext-format');
YourFileList.Add(sFileName); //
YourFileList : TStringList
end;
end;

[/code]

===================引 用 kuf41 文 章===================
[code delphi]
frxReport1.LoadFromFile('E:\Temp\Test\test.fr3');
frxReport1.PrepareReport;
frxReport1.Export(frxJPEGExport1);
[/code]

需求:
直接匯出jpg圖檔,有時資料超過1頁時,會有2個以上的圖檔,
需要抓到所有圖檔的檔名然後作為附件寄信出去

問題:
如何知道匯出了N個檔案,或共有N頁?
編輯記錄
Victor4022 重新編輯於 2011-02-20 21:28:19, 註解 無‧
Victor4022 重新編輯於 2011-02-20 21:29:30, 註解 無‧
系統時間:2017-12-14 23:11:08
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!