Показать сообщение отдельно
  #1  
Старый 02.03.2011, 11:12
HomerSSS HomerSSS вне форума
Прохожий
 
Регистрация: 19.11.2008
Сообщения: 11
Репутация: 10
Вопрос Delphi и Word. Вопросы...

Доброго дня всем!

Народ, подскажите путь...

Начал осваивать работу с Wopd-ом из Delphi. Вот вопрос образовался. Простой пример - создан документ и напечатаны две строки...

Код:
W:=CreateOleObject('Word.Application');
  W.visible:=True;
  W.Documents.Add;
  W.ActiveDocument.Range.ParagraphFormat.Alignment:= 0;
  W.ActiveDocument.Range.InsertAfter('Первая строка'+#13);
  W.ActiveDocument.Range.InsertAfter('Вторая строка');

Теперь шрифт первой строки делаем жирным...

Код:
  W:=CreateOleObject('Word.Application');
  W.visible:=True;
  W.Documents.Add;
  W.ActiveDocument.Range.Font.Bold:=1;
  W.ActiveDocument.Range.ParagraphFormat.Alignment:= 0;
  W.ActiveDocument.Range.InsertAfter('Первая строка'+#13);
  W.ActiveDocument.Range.InsertAfter('Вторая строка');

Делается жирным текст всего документа... ОК... Добавляем ещё строчку кода

Код:
  W:=CreateOleObject('Word.Application');
  W.visible:=True;
  W.Documents.Add;
  W.ActiveDocument.Range.Font.Bold:=1;
  W.ActiveDocument.Range.ParagraphFormat.Alignment:= 0;
  W.ActiveDocument.Range.InsertAfter('Первая строка'+#13);
  W.ActiveDocument.Range.Font.Bold:=0;
  W.ActiveDocument.Range.InsertAfter('Вторая строка');

Но тогда текст документа ВЕСЬ опять становится обычным...

Как быть, если надо чтобы стиль шрифта строк документа можно было менять по отдельности?
Ответить с цитированием