+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف اعمل رقم الصفحة في QuicRreport (/showthread.php?tid=8656)
كيف اعمل رقم الصفحة في QuicRreport - medreg - 03-05-2017
السلام عليكم ورحمة الله تعالى وبركاته
عندما تكون لي 5 صفحات
كيف اجعل في كل صفحة رقم كهذا
الصفحة الاولى يظهر بها صفحة : 1/5
الصفخة الثانية يظهر بها صفحة : 2/5
وهكذا الى غاية الصفحة الاخير والتي يجب ان يظهر بها صفخة : 5/5
وبارك الله فيكم
RE: كيف اعمل رقم الصفحة في QuicRreport - wadoud - 04-05-2017
السلام عليكم أخي الكريم
أولا يجب عليك عد عدد الصفحات في الحدث onclick لزر الطباعة
كود :
var
nPag:integer;
begin
QuickRep1.Prepare ;
nPag := QuickRep1.QRPrinter.PageCount ;
QuickRep1.Preview ; // Print
الآن لديك رقم الصفحات ماعليك سوى نقل القيمة الى tQrlabel مثلا
QRLabel10.Caption:=IntToStr(nPag);والباقي عليك وضعه الى جانب الصفحات في QuickRep1 كما تريد
والله هو الموفق
RE: كيف اعمل رقم الصفحة في QuicRreport - medreg - 04-05-2017
بارك الله فيكم ونفعني واياكم بما فيه الخير ان شاء الله
RE: كيف اعمل رقم الصفحة في QuicRreport - imadus - 05-05-2017
الاجابة في المرفقات
RE: كيف اعمل رقم الصفحة في QuicRreport - medreg - 08-05-2017
(05-05-2017, 04:25 PM)imadus كتب : الاجابة في المرفقات
شكرا على المرور وبارك الله فيكم
تم الحل وكانت النتيجة 100/100 بارك الله فيكم جميعا