الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

ياشباب ساعدوني في موضوع الطباعة

مغلق
بدأه العربي2004 في 22 مايو 2005 · 4 رد · 599 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

انا استخدم اداة داتا ريبورت وهي مريحتني على الآخر ,عندي استمارات محددة بحجم A4 المشكلة عندما يغير المستخدم اعدادات الطابعة ويقوم بتغير حجم الطابعة يحصل ERR طبعاً لأن الإستمارة الي عندي بحجم A4 المهم استخدمت أمر Printer.PaperSize = 9 عندما يقوم المستخدم بضغط أمر طباعة ولكن للأسف هذا الأمر لم يحرك ساكن لا يقوم بتغير حجم الورقة ياأخوان ارجو منكم المساعدة أعطوني امر يغير حجم الورقة في إعادات الطباعة ينفع على اي طابعة

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

.

MyLogo.GIF

ahm631@hotmail.com

#2

طيب ليش ماتخلي حجم ورق الطابعة A4

حجم التقرير لازم يكون زي حجم الورق المختار للطابعة او اصغر

ولا بيطلع لك رساله يقول لك حجم التقرير اكبر من حجم ورق الطابعة

وجرب بعد الهوامش :

BottomMargin =0

LeftMargin =0

RightMargin =0

TopMargin =0

وشكرا

تم تعديل هذه المشاركة بواسطة MaTaRi في 22 مايو 2005 في 02:59

#3

اشكرك يأخي على المشاركة بكل بساطة المطلوب هو انه عندما اضغط على زر طباعة يقوم البرنامج بتغيير إعدادات الطابعة فمثلا لو كان حجم ورقم الطابعة LETTER اريده ان يصبح A4وذلك من داخل الفجوال انا اريد تغير حجم ورق الطباعة على كل الويندوز وليس على برنامجي فقط

انشاءلله يكون لأمر اتضح

.

MyLogo.GIF

ahm631@hotmail.com

#4

جرب الكود التالى

Printer.ScaleMode = vbPixels
Printer.PaperSize = vbPRPSA4
Printer.Orientation = vbPRORPortrait
Printer.PrintQuality = vbPRPQHigh

1- لا خير في حسن الجسوم وطولها إن لم يزن حسن الجسوم عقول

2- لا تنظر إلى صغر الخطيئة .. ولكن انظر إلى عظم من عصيت

3- قد يجمع المال غير آكله . . ويأكل المال غير من جمعه

4- من وثق بالله أغناه ومن توكل عليه كفاه ومن خافه قلت مخافته ومن عرفه تمت معرفته

5- أن تضيء شمعة صغيرة خير لك من أن تنفق عمرك تلعن الظلام

6- لا يحزنك إنك فشلت مادمت تحاول الوقوف على قدميك من جديد

7- صديقك من يصارحك بأخطائك لا من يجملها ليكسب رضاءك

8 - الابتسامة كلمة طيبة بغير حروف

9- لا داعى للخوف من صوت الرصاص .. فالرصاصة التى تقتلك لن تسمع صوتها

10 -- يستطيع الناس أن يعيشوا بلا هواء بضع دقائق وبلا ماء أسبوعين وبلا

طعام حوالى شهرين وبلا أفكار سنوات لا حصر لها

من مواضيعى :

--------------

دروس تعلم كيف تصحح أخطائك بنفسك

برنامج الحائط النارى العربى ---- جديد

برنامج ساعة بالعقارب ------ جديد

لعبة سناك الشهيرة مع الكود

غير نظرتك لل picturebox وانظر ماذا فعلت بها

حمل ملف فلاش على الفورم بكل سهولة

مكتبة تحتوى على 50000 كتاب مجانى معظمها عن الكمبيوتر و البرمجة

برنامج المترجم العربى لترجمة الافلام

#5

شكراً أخي VB6-Rocket ولكن للأسف الكود لم ينفع لو نفذت الكود وذهبت اللى لوحة التحكم --) إعدادات الطابعة ستجد الأعدادات مثل ماهي لم يتغير بها شئ

انا مش مصدق انه مافي دوال API في الـVB تقدر تعدل وتلعب في إعدادات البرنتر

.

MyLogo.GIF

ahm631@hotmail.com

هذا الموضوع مغلق.

مواضيع مشابهة