Альтернатива StraightenText
dEar / 05.07.2010, 14:10/00:41
Форум:
Есть ли в VBA функция. делающая то, что делает CorelScript.StraightenText . Попытался поискать - не нашел... Может, кто-нибудь оказался удачливей?
Есть ли в VBA функция. делающая то, что делает CorelScript.StraightenText . Попытался поискать - не нашел... Может, кто-нибудь оказался удачливей?
Object browser в Визуал Бейсике показывает, что есть такая функция
StraightenText(FirstSelectedChar As Long, LastSelectedChar As Long) As Long
Но эта функция относится к CorelScript.class, т.е. как я понимаю - наследуется из более ранних версий Корела...
dEar, а какая разница то? Работает же.
Ну хочется то по нормальному, а не как обычно :)
Это из разряда "хочу потому что хочу" :)
Какая разница из какого класса функция, работает и хрен бы с ней :)
Ну, что тут сказать.... С данным утверждением трудно не согласиться :)
могу добавить, если так уж хочется по-нормальному - то поюзай функции класса TextRange. Найди свойства каждого символа и установи его смещение и угол в ноль. Я думаю именно это и делает вышеупомянутая функция StraightenText - выравнивает все символы текста относительно базовой линии
Я думаю это то, что надо... И как сам не догадался.... Буду завтра пробовать.. Спасибо
не утерпел, попробовал дома - все получается.... Большое спасибо
.Text.Story.CharAngle = 0Страницы