Главная страница
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.035 c
2-1137704176
kizam
2006-01-19 23:56
2006.02.05
такая ошыбка


3-1133983779
SerGe007
2005-12-07 22:29
2006.02.05
Интербейс и Дельфи


15-1137497238
Харько
2006-01-17 14:27
2006.02.05
Как вам Elbrus2k?


3-1133543772
VadimSpb
2005-12-02 20:16
2006.02.05
Сжать и восстановить БД


6-1130389111
WebSQLNeeder
2005-10-27 08:58
2006.02.05
Как програмно отследить что картинка в TWebBrowser не загрузилась