Dobrý den, v jednom projektu se snažím načíst do RichTextBoxu textový soubor, ale s překvapením jsem zjistil, že se sice načte, ale pokazí se diakritika. Načítám to pomocí tohoto kódu:
Dim fileReader As String
fileReader = My.Computer.FileSystem.ReadAllText("C:\temp\ftp\15052013.txt")
RichTextBox1.Text = fileReader
I když pak zkouším různé kombinace nastavení kódování, tak se sice mění výsledek v tom RTboxu, ale pořád "rozsypaný čaj" Zde je kód:
Dim kodovani As System.Text.Encoding = System.Text.Encoding.GetEncoding(1250)
Dim vystup As String = kodovani.GetString(System.Text.Encoding.Default.GetBytes(fileReader))
Poradí někdo, co dělám zle? Díky, JP
|