تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] سؤال عن أداة RichTextBox
#1
Question 
كيف يمكنني أن أربط أداتان RichTextBox باللون

أي أني أريد إذا تم تحديد نص وتلوينه في RichTextBox1 يحدث نفس الشئ في RichTextBox2

مثال في TextBox

كود :
Text1.Forecolor = Text2.Forecolor

لكن في أداة RichTextBox الكود يكون كالآتي ولا يعمل

كود :
RichTextBox1.SelColor = RichTextBox2.SelColor

الرجاء إفادتنا
الرد }}}}
تم الشكر بواسطة:
#2
أخي الكريم يمكنك وضع هذا الكود داخل زر أمر وتجريبه لكي تتعرف على كيفية ضبط خاصية اللون لأداة رتش تكست

Private Sub Command1_Click()
RichTextBox1.SelStart = 0
RichTextBox1.SelLength = Len(RichTextBox1.Text)
RichTextBox1.SelColor = &HFF&

RichTextBox1.SelStart = 4
RichTextBox1.SelLength = 7
RichTextBox1.SelColor = &H00FF0000&
End Sub
الرد }}}}
تم الشكر بواسطة:
#3
أخي بعد محاولات كثيرة توصلت لهذا الكود

ولكن المشكلة إذا حددت نص وتغير لونه وعدت من جديد وحددت نص آخر يتغير لون النص الجديد ويمسح النص الأول (أنا عارف إنكم مافهتم شي تابعوا المثال xDHuh)

الكود الذي توصلت إليه
كود :
On Error Resume Next

Form2.RichTextBox2.Text = Form1.RichTextBox1.Text


RichTextBox2.SelStart = Form1.RichTextBox1.SelStart
RichTextBox2.Text = Form1.RichTextBox1.SelLength


RichTextBox2.SelColor = Form1.RichTextBox1.SelColor


الملفات المرفقة
.rar   مثال RichTextBox.rar (الحجم : 2.8 ك ب / التحميلات : 43)
الرد }}}}
تم الشكر بواسطة:
#4
السلام عليكم

- عدل كود الفورم2 , أمسحه كله , وألصق هذا بدله :

كود :
Private Sub Form_Load()
On Error Resume Next

Form2.RichTextBox2.TextRTF = Form1.RichTextBox1.TextRTF

End Sub

- تحياتي .
كود :
For each Breathe in MyLife
Breathe.Say " سبحان الله والحمد لله ولا إله إلا الله والله أكبر أستغر الله العظيم وأتوب إليه"
Next
الرد }}}}
تم الشكر بواسطة: النبراس12
#5
جزاك الله خير أفتدني جدا
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال أريد أن أكتب رقم الزبون في التكست بوكس وأعرض فواتير الزبون في التقرير فيصل علي 2 76 08-05-17, 08:57 PM
آخر رد: فيصل علي
  سؤال حوال اداة التاريخ والوقت مع التقارير كنونو 2 77 27-04-17, 05:17 PM
آخر رد: كنونو
  سؤال عن القوائم السريعة كنونو 3 145 20-04-17, 11:25 PM
آخر رد: السيد الغالي
  سؤال حول الأداة datacombo المبرمج العتيق 2 104 03-04-17, 01:23 AM
آخر رد: المبرمج العتيق
  سؤال حول الأداة datareport فى برنامج مرفق المبرمج العتيق 4 163 26-03-17, 04:16 PM
آخر رد: Ahmed_Mansoor
  [vb6.0] سؤال فى داتا ريبورت عن كيفية طباعة سجل واحد فقط المبرمج العتيق 5 434 24-03-17, 06:06 PM
آخر رد: المبرمج العتيق
  سؤال بخصوص الحلقات التكرارية / اضافة درجة بشروط haiderkh 13 327 02-03-17, 05:58 PM
آخر رد: السيد الغالي
  سؤال فى التقارير اداة داتا ريبورت محمودالصياد محمود 1 100 25-02-17, 11:39 PM
آخر رد: السيد الغالي
  سؤال عن قاعدة البيانات اكسس مبرمج جديد 5 220 17-02-17, 01:27 PM
آخر رد: مبرمج جديد
  أداة تصفح غير webbrowser أيمن الفخراني 2 126 21-01-17, 10:18 PM
آخر رد: أيمن الفخراني

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم