Форум пользователей Visio
http://visio.getbb.ru/

Кодировка текста
http://visio.getbb.ru/viewtopic.php?f=6&t=102
Страница 1 из 1

Автор:  egoist [ 15 май 2012, 21:51 ]
Заголовок сообщения:  Кодировка текста

Это вообще возможно как нибудь программно поменять кодировку. Дело в том что вставляю автокадовский чертёж в визио преобразовываю его в элементы автофигур визиои в тексте слетает кодировка.пишет каракули. Облазил все настройки в визио такого ваще нет.как это можно сделать?

Автор:  Surrogate [ 16 май 2012, 06:53 ]
Заголовок сообщения:  Re: Кодировка текста

не уверен на все 100%, но наверное все будет зависеть от того какие шрифты используются в автокаде?
если виндовские то еще можно что-то сделать, а если автокадовские *.shx то не получится.
давным-давно когда я последний раз пытался вставлять автокадовские фрагменты в визио, у меня автокадовский текст писанный не виндовскими шрифтами - при вставке в визио замещался на кучу отрезочков и дуг.
это было году в 2004, может микрософт что-то и придумал с тех пор.
доберусь до работы попробую :)

Автор:  Surrogate [ 16 май 2012, 09:37 ]
Заголовок сообщения:  Re: Кодировка текста

кстати косяк может быть и при использовании виндовских TrueTypeFonts (*.ttf), некоторые умельцы делают свои шрифты косящие под шрифты по ГОСТу. Но в этих самопальных шрифтах могут не совпадать таблицы символов - отсюда могут быть крокозябры!

в файле АВТОКАД какие используются шрифты

Автор:  egoist [ 16 май 2012, 09:48 ]
Заголовок сообщения:  Re: Кодировка текста

Gost A.shx

Скорее всего это самопальный шрифт

Автор:  Гость [ 05 дек 2018, 12:36 ]
Заголовок сообщения:  Re: Кодировка текста

Здравствуйте!
Адаптировал для Visio макрос замены кодировки 1252 -> 1251
Необходимо выделить элемент с текстом и запустить макрос:

Sub kyr()
Dim s$, i&, j&
s = ActiveWindow.SelectedText
For i = 1 To Len(s)
j = AscW(Mid$(s, i, 1))
If j < 256 Then
Mid$(s, i, 1) = Chr(j)
End If
Next
ActiveWindow.SelectedText.Text = s
End Sub

Страница 1 из 1 Часовой пояс: UTC + 3 часа [ Летнее время ]
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
http://www.phpbb.com/