Проблемы с кириллицей в MS Rich TextBox 6.0

23.01.2009, 18:16. **Показов** 2126. **Ответов** 1

Студворк — интернет-сервис помощи студентам

Есть RTF-файл, напечатанный на русском. Гружу его в RichTextBox:

Code
1
2
3
With RichTextBox1
    .LoadFile appPath + 'RTFHelp.rtf', rtfRTF
End With

Получается нечитабельно.
Если делаю вот так - тоже нечитабельно:

Code
1
2
3
4
5
6
7
With RichTextBox1
    .LoadFile appPath + 'RTFHelp.rtf', rtfRTF
    .SelStart = 0
    .SelLength = Len(.Text)
    .SelFontName = 'Times New Roman'
    .SelStart = 0
End With

А если так - то всё в порядке:

Code
1
2
3
4
5
6
7
With RichTextBox1
    .LoadFile appPath + 'RTFHelp.rtf', rtfRTF
    .SelStart = 0
    .SelLength = Len(.Text)
    .SelFontName = 'Times New Roman Cyr'  '  <<< добавил ' Cyr'
    .SelStart = 0
End With

Это же, блин, полная фигня!!! А если у меня текст разными шрифтами набран?! И почему эта чёртова RichTextBox не хочет распознавать кодировку?!

Всё вышеописанное наблюдается при следующей конфигурации:
MS Windows 98 SE
MS Office 2000
MS VB 6.0 (Retail 6.0.8964)
MS Rich TextBox Control 6.0 (SP4) - файл RICHTX32.OCX, версия 6.00.8804, размер 203976 байт, дата 22.05.2000.

@Alexey Spirin · 25.01.2009, 14:48

попробуй поменять региональные настройки - иногда из-за них такая проблема возникает. У меня вот стояла страна USA и язык English в региональных натсройках (русский, ессно, тоже установлен). Тык вот когда страну на Россию поменял и язык на Русский, то все ок стало...

Новые блоги и статьи Все статьи Все блоги /
Перемещение выделенных строк ТЧ из одного документа в другой Maks 30.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .	Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .	Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .	Настройка движения справочника по регистру сведений Maks 29.03.2026 Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .
Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 27.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .	Автозаполнение реквизитов при создании документа Maks 27.03.2026 Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .	Команды формы и диалоговое окно Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .

@Alexey Spirin 2 / 2 / 1 Регистрация: 18.10.2007 Сообщений: 1,748
	25.01.2009, 14:48
	попробуй поменять региональные настройки - иногда из-за них такая проблема возникает. У меня вот стояла страна USA и язык English в региональных натсройках (русский, ессно, тоже установлен). Тык вот когда страну на Россию поменял и язык на Русский, то все ок стало... 0