[سعود]

لدي هذا الكود

كود :

RichTextBox2.SelectionBackColor = Color.Red

وهذا طبعا قبل ارساله

كود :

streamw.Write(pcname & ": " & RichTextBox2.Text & vbNewLine & "________________________" & vbNewLine)

لكن الاحظ لا يتم حفظ التنسيق فكيف الحل الصحيح

[tariq2812]

لارجاع تنسيق المحتوى

كود :

RichTextBox1.Rtf

[سعود]

ياليت تعدل المثال لاني ماقدرت استوعب شلون ..التنسيق rtf اليس تتم قراءته من ملف؟ فكيف نرسل ونستقبل بتنسيق الوان؟ اريد المستقبل لو رسالته غير المرسل

[Easy4ever]

حاولت التجربه ولاكن لا فائده
بعض النصوص ينسخ تنسيقه مثل نصوص إللي بالمحرر الأكواد فيجوال بيسك يوم نسخته ولصقته نسخ التنسيق معه

[sooriaty03]

السلام عليكم ورحمة الله وبركاته
تفضل أخي الحبيب
هذا الكود بإذن الله يفي بالطلب

كود :

Dim PcName As String = "PcName"
        Dim OldRtf As String = RichTextBox2.Rtf
        RichTextBox2.Text = PcName & ": " & RichTextBox2.Text & vbNewLine & "________________________" & vbNewLine
        streamw.Write(RichTextBox2.Rtf)
        RichTextBox2.Rtf = OldRtf

بالتوفيق

[just.coder]

اقترح انو مع الارسال بيتحط معلومات التنثسق مثلا

fontsize(14) fontcolor(red) هكذا مثلا والبرنامج الى هيستقبل الرسالة يعالج المعلومات دى وينفذها على الرتش تكست بوكس الى بيظهر فيها الرسايل