EDITEUR DE TEXTE WINFORM AVEC CORRECTEUR ORTHOGRAPHIQUE WPF

Imports System.Windows.Controls
Imports System.Windows.Forms.Integration
Imports System.Windows.Documents
Imports System.Windows.Media
Imports System.IO

Public Class Form1
    Dim wpfRTFHost As New ElementHost
    Dim RTFBox As New System.Windows.Controls.RichTextBox()
    Public FileName As String = String.Empty

    Public Sub New()
        ' This call is required by the Windows Form Designer.
        InitializeComponent()
        ' allows WPF controls to be hosted in a Win32 application
        ' create an instance of RTF box and enable SpellCheck 
        System.Windows.Controls.SpellCheck.SetIsEnabled(RTFBox, True)
        ' hosts the WPF control, fills the window
        wpfRTFHost.Child = RTFBox
        ' add to the Win32 window
        Me.Controls.Add(wpfRTFHost)
        RTFBox.VerticalScrollBarVisibility = ScrollBarVisibility.Auto
        RTFBox.HorizontalScrollBarVisibility = ScrollBarVisibility.Auto

    End Sub
' le ZIP