• 1
ameedoo3000

تكبير التقرير تلقائيا ( ملئ الشاشة )

سؤال

السلام عليكم اخوانى الاعزاء 

كتبت فيما سبق سؤال خاص بفتح التقرير بالجحم الكبير تلقائيا بمجرد استدعائه من اى نموذج ، وكتبت ايضا سؤال عن كيفية اظهار مربع حوارى خاص بنوع الطابعة وعدد النسخ المراد طباعتها ........ الخ  وذلك من داخل التقرير وهو مفتوح ، وللأسف لم اجد مجيب بل على العكس تم مسح موضوعي من الاصل ؟!

هل من الممكن معرفة السبب ، علما بأنى قد بحت فى مواضيع كثيرة بالمنتدى لم اجد اجابة سؤالى !!

اتعشم من اخوانى بالمنتدى ايجاد اجابة لهذا السؤال 

مع تحياتى لكم جميعا

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

12 إجابة على هذا السؤال .

  • 0

اخي انا لم افهم كيفية فتح التقرير بالحجم الكبير تلقائياً

اما الجزء الخاص بمربع الحواري وانت تقصد شريط الادوات الخاص بالطباعة فاستخدم هذا الامر

		REPORT FORM report_name.frx TO PRINTER PROMPT NODIALOG PREVIEW

report_name هو اسم التقرير

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اخي العزيز

يمسح الموضوع اذا خالف شروط المنتدى 

وقد تم تنبيهك اكثر من مرة 

اخي العزيز  هل تعلم ان مواضيع كلها يجب ان تكون مع اول موضوع كتبتهٌ عن التقرير 

اي تضيف أسئلتك تباعاً لكي يكون موضوع شاملاً عن التقرير والغاية هي عامة اي اذا شخص اخر واجهة نفس الأشكال يوجه لموضوعك 

الرجاء الالتزام بقوانين المشاركات وكتابة المواضيع

توجد أسفل معلومات حسابك او من خلال الموضوع قواعد طرح المشاركات والمواضيع

تحياتي للجميع 

تم تعديل بواسطه lion-lion
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اخى العزيز اكرم 

السلام عليكم ورحمة الله 

ما اسأل عنه هو كيفية فتح مربع حواري خاص بنوع الطابعة وعدد النسخ ...... بمجرد الضغط على (ctrl + P) كما ما هو معتاد فى اى برنامج تابع لميكروسوفت ، وذلك من خلال المعاينة نفسها ، اى من خلال التقرير وهو مفتوح ، وذلك لأختيار رقم الصفحة المحددة للطباعة او حتى تغيير الطابعة ...... الخ ، وحاولت ولم اجد نتيجة .

اما بخصوص فتح التقرير كبيرا تلقائيا ، هو فتح التقرير ملئ الشاشة بالحجم 100% لمجرد استدعائه ، حيث ان التقرير يفتح صغيرا او بنسبة غير 100% واقوم انا بعد ذلك بتكبيره بالحجم المناسب للشاشة من النسب المئوية الموجودة . 

و طبعا كل هذه المحاولات كانت بعد تحويل المشروع لملف تنفيذي .

ارجو الافادة 

مع جزيل شكري واحترامي

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اخي العزيز 

اليك الكود كما ترغب في استعراض التقرير بشاشة كبيرة وهو معدل من قبلي والبرنامج (منقول من MSDN)

PUBLIC cpreview,cListener
crepot = GETFILE("frx")
IF EMPTY(crepot)
MESSAGEBOX("non found report for show ",64,"lion iraq")
   RETURN 
ENDIF  
DO (_REPORTPREVIEW) WITH cpreview
cpreview.Caption = 'lioniraq'
cpreview.ZoomLevel = 11 
cpreview.ToolbarIsVisible = .T.

cListener= CREATEOBJECT('ReportListener')
cListener.ListenerType = 1 
cListener.PreviewContainer = cpreview

REPORT FORM (crepot) OBJECT cListener NOWAIT 

cpreview.oForm.Toolbar.Dock(0) 
cpreview.oForm.WindowState = 2 

 

full_rep.zip

1

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

الله ينور عليك اخى العزيز فراس

لكن هناك مشكلة فى تنفيذ السطر 

DO (_REPORTPREVIEW) WITH cpreview

ويقف البرنامج عنده دون تكمله

ارجو الافادة 

مع تحياتى لك اخى العزيز

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اي نسخة تستخدم من الفيجوال فوكس برو

لان البرنامج يعمل بطاقتهٌ الكاملة مع النسخة التاسعة بتحديثاتها 

وهذا تطبيق مرفق مع الفيجوال لغرض عرض التقارير 

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

السلام عليكم 

اخى الكريم

انا اعمل على نسخة فيجوال فوكس برو الاصدار التاسع SP2

 

 

 

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

ونفس الأشكال موجود

نظام الوندوز هو ٣٢ او ٦٤ بت لجهازك

والافضل لو ترفق الرسالة للخطا

واذكرك اخي العزيز في بعض الاحيان واغلبها يجب ارفاق مثال للمشكلة 

اما للخطا فارفاق صورة عن نص الرسالة 

وتحياتي للجميع 

تم تعديل بواسطه lion-lion
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اخى الكريم ( فراس)

ارجو تقبل اعتذاري !

فعلا كان الكود الذى ارسلته سليم مائة بالمائة ولا غبار عليه ويعمل بشكل صحيح

ولكنى اخطأت فى محاولة التغيير فيه لمجرد الاختصار فكانت هناك رسالة الخطأ فى التنفيذ .

وللامانة انا اعترف بهذا واشكرك شكرا جزيلا على كود البرنامج الرائع الذى حل المشكلة لى 

ومرفق اليك ما تم تغييره وسبب ظهور رسالة الخطأ ، راجيا الله ان تتقبل اعتذاري 

ولك منى اخى الكريم كل التحية والتقدير

 

full_rep1.rar

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اخي العزيز لا عليك بالاعتذار وليس هنالك مشكلة 

وانا اشجعك على التعديل على البرامج والايعازات لغرض فهم ومعرفة الايعاز 

والحمد لله في التوفيق معك لاتنسى ان تثبت الاجابة لغرض اغلاق السوال 

وتحياتي للجميع

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

لك جزيل الشكر اخى الكريمفراس 

تمت الاجابة بحمد الله على سؤالي والفضل يرجع لك 

وجزاك الله كل خير 

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اخي العزيز الفضل لله لهدايتنا

والاجابة انت حددها بجانب المشاركة قم بتأشيرات من خلال الأسهم 

2

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان

  • يستعرض القسم حالياً   0 members

    لا يوجد أعضاء مسجلين يشاهدون هذه الصفحة .