Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.02.05;
Скачать: CL | DM;

Вниз

Word. Установка курсора на заданную позицию в строке.   Найти похожие ветки 

 
King of Lamers ©   (2005-04-06 21:41) [0]

Приветсвую.

Мучаюсь над следующей проблеммой: добавляю пустую строку, вставляю текст в начало, теперь необходимо переместить курсор на определенную позицию (например 10 сантиметров, согласно "линейке") и добавить еше текст... просто понаставить пробелы не выйдет, ибо длинна первого куска текста неизвестна (но не больше некого максимума). Следовательно, нужна некая функция, получить её спомошью макроса VB не смог :(

И как вариант решения проблеммы... можно ли получить длинну word-строки (с учетом сделанных отступов, размера и типа шрифта)? Т.е. другими словами, узнать сколько символов при данном раскладе влезет в строку?

Спасибо за внимание.


 
YurikGL ©   (2005-04-07 08:08) [1]


> Мучаюсь над следующей проблеммой: добавляю пустую строку,
> вставляю текст в начало, теперь необходимо переместить курсор
> на определенную позицию (например 10 сантиметров, согласно
> "линейке") и добавить еше текст... просто понаставить пробелы
> не выйдет, ибо длинна первого куска текста неизвестна (но
> не больше некого максимума). Следовательно, нужна некая
> функция, получить её спомошью макроса VB не смог :(


во ворде, если кликнуть мышкой на линейке, появиться TabStop и текст после сивола табуляции начнется с этого TabStop-а
Макрос получения TabStop-а

Selection.ParagraphFormat.TabStops.Add Position:=CentimetersToPoints(3.17) _
       , Alignment:=wdAlignTabLeft, Leader:=wdTabLeaderSpaces


 
King of Lamers ©   (2005-04-07 20:00) [2]

Да-да-да, именно так :0) Днем на парах родил сию мысль

vr:=wdAlignTabLeft;vr2:=wdTabLeaderSpaces;
WP.Selection.ParagraphFormat.TabStops.Add(WP.CentimetersToPoints(10), vr,vr2);
WP.Selection.TypeText(#9);

... обратил внимание, что вдали от компьютера мозг варит лучше.

ЗЫ: В любом случае, спасибо, что не прошли мимо вопроса.



Страницы: 1 вся ветка

Текущий архив: 2006.02.05;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.038 c
2-1137568385
pavel_guzhanov
2006-01-18 10:13
2006.02.05
Путь к текущему профилю пользователя


2-1137662706
49 Cent
2006-01-19 12:25
2006.02.05
Запрос выдает ошибку "Недопустимое имя псевдонима"


4-1132580583
clickmaker
2005-11-21 16:43
2006.02.05
MSI (Windows Installer) + AddMonitor() = Access denied


10-1113208192
uli
2005-04-11 12:29
2006.02.05
Как получить номер документа ВОРД при его открытии?


15-1137508509
JLes
2006-01-17 17:35
2006.02.05
Delphi 2005 и Help (HxS/HxI-файлы)