تنظیمات Header And Footer در FastReport

[nasr]

سلام

در Word یک خاصیتی وجود داره که می شه Header And Footer برای صفحات قرار داد بطوریکه صفحات فرد دارای یک

Header جدا و صفحات زوج نیز دارای یک Header جدا باشند (هر کدام از صفحات دارای یه متن جدا )

من اینکار را می خوام در دلفی و FastReport انجام بدم

من اینکار را به این روش انجام دادم که یک جدول درست کردم و دوتا فیلد برای اون در نظر گرفتم با نام Header و Footer

حال در FastReport در قسمت Footer صفحات ، شماره صفحه را قرار دادم و برای قسمت Header صفحات در OnBeforPrint

کد زیر را نوشتم



if memo4.memo = 1 then
memo1.memo := [DBISAMTable1."header"]
else
if memo4.memo = 2 then
memo1.memo := [DBISAMTable1."footer"];
در کد بالا Memo4 همان شماره صفحه است

حالا سوال بنده

اول اینکه صفحات زوج و فرد را چگونه مشخص کنم . من در این کد از اعداد 1 و 2 استفاده کرده ام که فرض بر وجود فقط 2 صفحه است

دوم اینکه با همین اعداد هم مشکل دارم و یک پیام خطا ظاهر می شه با عنوان


Could not convert variant of type (string) in to type (double)

حتی
Inttostr(2)
هم نوشتم مشکل حل نشد
عدد 2 را بصورت'2' نوشتم حل نشد

ممنون می شم اگه کمکم کنید

با تشکر

[moradi_am]

میتوانید از Page# خود Fastreport استفاده کنید به این شکل

if int([page#]/2)*2=[page#] then
memo1.memo:='Even'
else
memo1.memo:='Odd';

[مهدی کرامتی]

در ضمن، برای نمایش Header و Footer در FastReport دو باند بنامهای Header و Footer وجود دارد.

[nasr]

با تشکر

مشکلم حل شد

خیلی متشکرم