منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

هلا بالشباب الرائع

عندي سؤال على السريع

ما هو أمر تغيير حجم خط RichTextBox بدون أن يتغير النص الملون
بمعنى آخر : عند تغيير حجم الخط لا تذهب الألوان ويتحول النص كله إلى اللون الأسود .

أرجو لكم التوفيق .

حدد النص الذي تريد تغيير حجمه وطبق عليه الكود التالي :

PHP كود :

RichTextBox1.SelectionFont = New Font(Font.OriginalFontName, 14) 

واذا كنت تريد تسميك الخط أو تخفيفه او تخطيطه استخدم الكود التالي (مع التغيير بالحالات) :

PHP كود :

RichTextBox1.SelectionFont = New Font(Font.OriginalFontName, 14, FontStyle.Bold) 

واذا كنت تريد تغيير نوع الخط استخدم الكود التالي (مع مراعاة اسم الخط ):

PHP كود :

RichTextBox1.SelectionFont = New Font("Tahoma", 14) 

واذا كنت تريد تغيير لون الخط استخدم الكود التالي(مع مراعاة اللون) :

كود :

RichTextBox1.SelectionColor = System.Drawing.Color.Green

مرحبا بك أستاذ طه

لأوضح لكم الفكرة ...

أنا عندي ComboBox فيه أرقام لأحجام الخطوط

وأريد لما أختار حجم محدد ، يتم تغيير حجم الخط في RichTextBox بالكامل
حاليا يتم ذلك فعلا ، ولكن المشكلة يتحول النص بالكامل إلى اللون الأسود !
وأنا أريده فقط يغير حجم الخط بدون أن يغير ألوان النص .
وهذا الأمر الذي أستخدمه حاليا

كود :

Me.txtCode.Font = New Font("", cmbFont.Text)

حيث أن txtCode هو اسم أداة RichTextBox
وكذلك cmbFont هو اسم ComboBox

السلام عليكم يا جماعة الخير

خلاص أخيرًا توصلت إلى حل مشكلة إعادة تحجيم الخط Big Grin

وذلك باستخدام الأكواد التالية :

كود :

  Dim FontSize As Byte = Val(cmbFont.Text)

        txtCode.SelectAll()

        txtCode.SelectionFont = New Drawing.Font("", FontSize, Font.Style)

والكود شغال 100% وجميل جدا وسريع Smile

شكرًا جزيلا لكم جميعًا على محاولاتكم نعي في التوصل إلى حل .

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

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

أبو خالد الشكري

Taha Okla

أبو خالد الشكري

أبو خالد الشكري