richtextbox in .net

[pashmaloo]

سلام ..
کسی میدونه توی "ریچ تکست باکس" دات نت چطوری میشه فونت را عوض کرد ؟

واسه عوض کردن استایل این کد توی msdn هست :

کد:

Private Sub ToggleBold()
   If Not richTextBox1.SelectionFont Is Nothing Then
      Dim currentFont As System.Drawing.Font = richTextBox1.SelectionFont
      Dim newFontStyle As System.Drawing.FontStyle

      If richTextBox1.SelectionFont.Bold = True Then
         newFontStyle = FontStyle.Regular
      Else
         newFontStyle = FontStyle.Bold
      End If

      richTextBox1.SelectionFont = New Font( _
         currentFont.FontFamily, _
         currentFont.Size, _
         newFontStyle _
      )
   End If
End sub

اما وقتی که برای عوض کردن فونت یک همچین چیزی مینویسم جواب نمیده :

کد:

RtfBox.SelectionFont = New Font("symbol", CurrentFont.Size, CurrentFont.Style)

ممنون

[Toxic_Program]

بجای selectionfont خود font رو عوض کن جواب می‌ده !!! اینهمه راه طولانی چرا !؟

[pashmaloo]

خوب برای اینکه میخوام selectionfont عوض شه نه خود font !!
مثلا میخوام یک تیکه را با فونت symbol بنویسم .... اگر از selectionfont استفاده بشه میشه اون یک تیکه را با همون symbol نوشت بدون اینکه بقیش فرقی بکنه اما اگر font را عوض کنم کل متن richtextbox به صورت symbol (یا هر فونتی که انتخاب کنم) در میاد !!

حالا چه کنم ؟

[Toxic_Program]

من که با این کد پایین مشکلی ندارم :

کد:

rtf1.SelectionFont = New Drawing.Font("symbol", rtf1.SelectionFont.Size, rtf1.SelectionFont.Style)

[pashmaloo]

مرسی تاکسیک جان ... مشکل رفع شد ...

[psdcompany]

دوستان کسی معادل کنترل Richtextbox رو توی CrystalReports ندیده کسی ساخته باشه؟
یعنی دقیقاکارایی و امکانات Richtextbox رو داشته باشه و بشه ازش توی گزارش های کریستال بجای Text box استفاده کرد؟
اگه سراغ دارین یا اینکه توانایی طراحی و پیاده سازیش رو دارین ، بنده حاضرم هر هزینه ای رو واسش پرداخت کنم.
چون شدیدا مدتهاست بهش نیازمندم.

باتشکر

[hossis]

با ضمیمه کردن وی بی 6 می تونی از تابع
vb6.FontChangName (نام فونت)
استفاده کنی