كيف اعمل رقم الصفحة في QuicRreport

[medreg]

السلام عليكم ورحمة الله تعالى وبركاته
عندما تكون لي 5 صفحات
كيف اجعل في كل صفحة رقم كهذا
الصفحة الاولى يظهر بها  صفحة : 1/5
الصفخة الثانية يظهر بها  صفحة : 2/5
وهكذا الى غاية الصفحة الاخير والتي يجب ان يظهر بها صفخة : 5/5
وبارك الله فيكم

[wadoud]

السلام عليكم أخي الكريم 

أولا يجب عليك عد عدد الصفحات  في الحدث onclick لزر الطباعة

كود :

var nPag:integer; begin QuickRep1.Prepare ; nPag := QuickRep1.QRPrinter.PageCount ; QuickRep1.Preview ; // Print الآن لديك رقم الصفحات ماعليك سوى نقل القيمة الى tQrlabel مثلا QRLabel10.Caption:=IntToStr(nPag);

والباقي عليك وضعه الى جانب الصفحات في QuickRep1 كما تريد
والله هو الموفق

[medreg]

بارك الله فيكم ونفعني واياكم بما فيه الخير ان شاء الله

[imadus]

الاجابة في المرفقات

[medreg]

الاجابة في المرفقات

شكرا على المرور وبارك الله فيكم
تم الحل وكانت النتيجة 100/100 بارك الله فيكم جميعا