[HomerSSS]

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

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

Начал осваивать работу с 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('Вторая строка');

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

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