| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Word Отступ слева
Andrewtitoff © (2009-02-16 11:34:00)Здравствуйте!, подскажите пожалуйста как в word-е задать отступ слева для отдельного участка текста?
Дуб (2009-02-17 08:36:00) [1]
> Anatoly Podgoretsky © (17.02.09 07:21) [11]
Абзац синоним привета.
"Полный параграф" - не звучит. Значит не синонимы. :)
Anatoly Podgoretsky (2009-02-17 07:21:00) [2]> AndreyV (17.02.2009 0:16:09) [9]
Абзац это синоним параграфа.
Германн (2009-02-17 00:24:00) [3]
> Разве не абзаца?
Хм. А что "абзац" в переводе МС отличается от "параграфа"?
В русской традиции применения этих терминов между ними есть очень большая разница. А вот в переводах часто вместо первого используется второе.
AndreyV (2009-02-17 00:16:00) [4]> [8] Anatoly Podgoretsky © (16.02.09 23:12)
> Нельзя для отдельных участков текста, это параметр параграфа.
Разве не абзаца?
Anatoly Podgoretsky (2009-02-16 23:12:00) [5]Нельзя для отдельных участков текста, это параметр параграфа.
Andrewtitoff (2009-02-16 16:21:00) [6]2 Anatoly Podgoretsky
Как это не задается?, Вы что конгда в ворде нечатаете - не можете у разных участков текста задавать разные отступы?..., ну а то что внутри строки - конечно может но это просто нужно учитывать в программе...
Как это не связанно?, это как раз и есть прямое решение ну или если точнеее один из вариантов решения...
Anatoly Podgoretsky (2009-02-16 13:27:00) [7]> Andrewtitoff (16.02.2009 13:19:04) [4]
Приведеное решение никак не связано с вопросом и с его расшифровкой.
Это совсем другой вопрос.
Anatoly Podgoretsky (2009-02-16 13:25:00) [8]> KilkennyCat (16.02.2009 12:10:03) [3]
Не выйдет, левая граница листа задается для всего документа или листа, оно не наботает на уровне отдельного участка текста, более того он же может оказаться внутри строки.
Andrewtitoff (2009-02-16 13:19:00) [9]Спасибо!
Макрос выглядит так:
Sub Макрос3()
'
' Макрос3 Макрос
' Макрос записан 16.02.2009 Felix
'
Selection.TypeText Text:="Строка1"
Selection.TypeParagraph
Selection.TypeText Text:="Строка2"
Selection.TypeParagraph
Selection.TypeText Text:="Строка3"
Selection.TypeParagraph
Selection.TypeText Text:="Строка4"
Selection.TypeParagraph
Selection.MoveUp Unit:=wdLine, Count:=1
Selection.MoveUp Unit:=wdLine, Count:=3, Extend:=wdExtend
With Selection.ParagraphFormat
.LeftIndent = CentimetersToPoints(10.16)
.SpaceBeforeAuto = False
.SpaceAfterAuto = False
End With
Selection.MoveDown Unit:=wdLine, Count:=3
End Sub
Аделать оказалось можно так:
WordDocument1.Range(e,b).Select;
WordParagraphFormat1.ConnectTo(WordApplication1.Selection.
ParagraphFormat);
WordParagraphFormat1.LeftIndent := 500;
KilkennyCat (2009-02-16 12:10:00) [10]Включите запись макроса. Задайте отступ. Посмотрите код получившегося макроса.
Это не всегда, но довольно-таки часто помогает.
Andrewtitoff (2009-02-16 11:58:00) [11]b:=length(s)-и; - просто очепятался там: b:=length(s)-1;
Andrewtitoff (2009-02-16 11:57:00) [12]Пробовал так:
s:='некоторый текст'+#13#10;
b:=length(s)-и;
e:=1;
WordDocument1.Range(e,b).Select;
WordDocument1.Sections.PageSetup.LeftMargin:=20;
Задает отступ для всего документа точно так же как и
WordDocument1.PageSetup.LeftMargin:=20;
| |
