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

التوسيط للطابعة

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

كيف ممكن أعمل توسيط للكلام بداخل Rich TextBox

وأطبعه موسط ...

ارجوا الافادة

 Printer.Orientation = vbPRORLandscape
          form1.richtextbox1.SelAlignment = 2
     form1.richtextbo1.SelPrint (Printer.hDC)

ارجوا الاسراع بالرد

وشكرا لكم

#2

كيف أعمل للأداة Rich TextBox توسيط

وعندما اتعامل مع الPrinter بالطباعة تطبع النص اللي بداخلها بعد عمل توسيط .. ويطبع توسيط

ارجوا الإفادة

بارك الله فيكم

#4

ممكن يساعدك إن شاء الله

http:///i...showtopic=66340

سبحان الله وبحمده سبحان الله العظيم

#5

معليش طولنها

www.arabteam2000-forum.com/i...showtopic=66340

سبحان الله وبحمده سبحان الله العظيم

#6

ما زال السؤال قائم

؟؟

:(

اتمنى ان يرد عليه بجواب شافي

اشكرك اخي على اللينك فقد تعلمت منه اشياء

ولكن مشكلتي مازالت قائمة

#7

اختى رزان

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

واليك الكود لا ينقصه سوى ان تضيفى أمر الطباعة فى اخره فقط

Private Sub Command1_Click()
Dim StartPos As Integer
Dim PrnWordLen As Integer

Printer.Font = RichTextBox1.Font
Printer.FontSize = RichTextBox1.Font.Size

PrnWordLen = Printer.TextWidth(RichTextBox1.Text)
StartPos = (RINTER.Width - PrnWordLen) / 2
Printer.CurrentX = StartPos

' PRINTING CODE
End Sub

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

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

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

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

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

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

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

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

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

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

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

من مواضيعى :

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

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

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

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

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

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

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

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

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

#8

ما ضبط

المشكلة اني اطبع على ورقة بحجم معين

؟؟

ما بعرف مش راضيه تضبط

#9

للرفع

:(

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

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