ورود

View Full Version : فهميدن تعداد صفحات قبل از اجراي Fast Report


mydelphi
سه شنبه 17 فروردین 1389, 08:23 صبح
سلام :
من مي خوام قبل از چاپ صفحات تعداد صفحات را در Fast Report بدونم يعني قبل از Preview تعداد صفحات رو داشته باشم تا با يك وقفه زماني Preview را به كاربر نمايش بدم
nice boy
سه شنبه 17 فروردین 1389, 20:05 عصر
از دستور زیر استفاده کن

frxReport1.PrepareReport();

این دستور باعث میشه گزارش ساخته بشه اما نمایش داده نشه. میتونی با تعریف یک متغییر و اسکریپت نویسی در گزارش تعداد صفحات رو بدست بیاری بعد اون رو به برنامه پاس بدی.
من قبلا این کارو در یک برنامه صفحه بندی انجام دادم:لبخندساده:
sasan_vm
سه شنبه 17 فروردین 1389, 22:07 عصر
frxReport1.PrepareReport;
frxReport1.PreviewPages.Count; // number of pages in report
mydelphi
چهارشنبه 18 فروردین 1389, 07:22 صبح
از دستور زیر استفاده کن

frxReport1.PrepareReport();این دستور باعث میشه گزارش ساخته بشه اما نمایش داده نشه. میتونی با تعریف یک متغییر و اسکریپت نویسی در گزارش تعداد صفحات رو بدست بیاری بعد اون رو به برنامه پاس بدی.
من قبلا این کارو در یک برنامه صفحه بندی انجام دادم:لبخندساده:

دوست عزيز متاسفانه كد ها جواب نداد ميشه يك نمونه برنامه اسکریپت نویسی رو قرار بدهيد!!!!!

ممنون ميشم .....
حسین خانی
چهارشنبه 18 فروردین 1389, 07:54 صبح
با سلام :لبخندساده:

دوست عزيز متاسفانه كد ها جواب نداد ميشه يك نمونه برنامه اسکریپت نویسی رو قرار بدهيد!!!!!

ممنون ميشم .....
دوست عزیز پاسخ جناب sasan_vm درست است !
فقط نتیجه را داخل یک Label برای نمایش تعداد صفحه بریزید :

frxReport1.PrepareReport;
Label1.Caption:=IntToStr(frxReport1.PreviewPages.C ount); // number of pages in report
فقط اگر تعداد صفحات بالا باشد با کمی تاخیر نمایش داده میشود .
موفق باشید ...