Форум пользователей Visio

Форум по вопросам применения и программирования в Visio
Текущее время: 19 ноя 2018, 06:47

Часовой пояс: UTC + 3 часа [ Летнее время ]


Правила форума


При размещении файлов предпочтительным является формат vsd (а не vsdx/vsdm)



Начать новую тему Ответить на тему  [ Сообщений: 7 ] 
Автор Сообщение
 Заголовок сообщения: Font Cell
СообщениеДобавлено: 22 мар 2018, 12:14 
Не в сети
Новичок

Зарегистрирован: 24 авг 2016, 22:21
Сообщений: 30
Использую Visio c: 2013
Очков репутации: 0

Добавить очки репутацииУменьшить очки репутации
Font Cell (Character Section)
Represents the number of the font used to format the text. Font numbers vary according to the fonts installed on your system. The number 0 represents the default font, which is typically Arial.

Подскажите, пожалуйста, уважаемые форумчане, как программно задать шрифт текста шейпа?
Если я правильно понял, значение в ячейке Font зависит от того, сколько шрифтов установлено у пользователя. Другими словами если задать строго числовое значение в ячейке Font, то у разных пользователей текст искомого шейпа будет написан разными шрифтами.

А нужно строго задать определенный шрифт. Будем считать, что он установлен у всех пользователей.

Есть возможность задать строго имя шрифта (к примеру, "Verdana")?


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Font Cell
СообщениеДобавлено: 22 мар 2018, 12:21 
Не в сети
Новичок

Зарегистрирован: 24 авг 2016, 22:21
Сообщений: 30
Использую Visio c: 2013
Очков репутации: 0

Добавить очки репутацииУменьшить очки репутации
upd: Что-то я запутался.
Открываю один документ, в котором шрифт текста шейпа (к примеру, "Gost Type A") указан в Font Cell =41
В другом документе другой шейп с таким же шрифтом уже содержит значение 68 в Font Cell.
:wall:


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Font Cell
СообщениеДобавлено: 22 мар 2018, 12:33 
Не в сети
Новичок

Зарегистрирован: 01 янв 2010, 05:46
Сообщений: 45
Откуда: ЕАО, Россия
Использую Visio c: 2010
Очков репутации: 1

Добавить очки репутацииУменьшить очки репутации
Описание функций Font (добавлена в 2013) и FontToID (добавлена в 2010) по-русски
Насколько я помню таких шрифтов два ttf и другое расширение
Эти гостовские шрифты для системы не родные. Возможно они в таком порядке прописались в систему


Последний раз редактировалось god-udach 22 мар 2018, 13:39, всего редактировалось 3 раз(а).

Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Font Cell
СообщениеДобавлено: 22 мар 2018, 12:42 
Не в сети
Новичок

Зарегистрирован: 01 янв 2010, 05:46
Сообщений: 45
Откуда: ЕАО, Россия
Использую Visio c: 2010
Очков репутации: 1

Добавить очки репутацииУменьшить очки репутации
Была тема про мороку с вышеупомянутым шрифтом.
Попробуйте использовать шрифт ISOCPEUR, разницу только эксперт почует


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Font Cell
СообщениеДобавлено: 22 мар 2018, 12:51 
Не в сети
Ветеран

Зарегистрирован: 30 июл 2014, 14:28
Сообщений: 492
Использую Visio c: 2008
Очков репутации: 100

Добавить очки репутацииУменьшить очки репутации
Попробуй:

Код:
Sub FontChange()
Dim f As String, fIndex As Integer

f = "GOST type A"
fIndex = ActiveDocument.Fonts(f).Index

ActiveWindow.Selection(1).Cells("Char.Font[1]").FormulaU = fIndex

End Sub


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Font Cell
СообщениеДобавлено: 22 мар 2018, 12:59 
Не в сети
Новичок

Зарегистрирован: 24 авг 2016, 22:21
Сообщений: 30
Использую Visio c: 2013
Очков репутации: 0

Добавить очки репутацииУменьшить очки репутации
Логично! Узнать индекс нужного шрифта и подставить его в FontCell.
Помогло!
Спасибо!


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Font Cell
СообщениеДобавлено: 22 мар 2018, 13:05 
Не в сети
Administrator

Зарегистрирован: 30 авг 2009, 11:02
Сообщений: 1187
Очков репутации: 100588

Добавить очки репутацииУменьшить очки репутации
Я бы еще попробовал создать стиль с нужным шрифтом.
Тогда переключение шрифта может вообще не понадобиться.
А если понадобится, то стиль можно назначить непосредственно по имени.
-------
А самое главное, о чем я обычно упоминаю в таких топиках (но народ это игнорирует), так это то, что не нужно бы связываться с такими шрифтами.
ЕСКД допускает при машинном выпуске документации использовать шрифты, отличные от чертежного. Нужно ткнуть свой отдел нормализации и стандартизации в это положение. Или, если уж нужно однообразие, закрепить под это дело один из обычных шрифтов в стандарте предприятия. Сразу снимется куча проблем.


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 7 ] 

Часовой пояс: UTC + 3 часа [ Летнее время ]



Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 1


Вы можете начинать темы
Вы можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Перейти:  
cron
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
Вы можете создать форум бесплатно PHPBB3 на Getbb.Ru, Также возможно сделать готовый форум PHPBB2 на Mybb2.ru
Русская поддержка phpBB