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

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

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

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

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

[Taha Okla]

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

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

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

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

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

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

كود :

  Dim FontSize As Byte = Val(cmbFont.Text)
       txtCode.SelectAll()
       txtCode.SelectionFont = New Drawing.Font("", FontSize, Font.Style)

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

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

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