И снова о Word-е

[soutsite]

Очень сожалею, но я старался найдти ответ на мой вопрос в форуме, но ничего не нашёл или ничего не понял
Мне просто надо из Нава написать несколько строк во Word-е

CREATE (WordApplication, TRUE);
WordApplication.Visible:=TRUE;
WordApplication.Documents.AddOld (Имя DOT);

//вот здесь добавить несколько предложений

//я написал
//здесь WordSelect Automation  'Microsoft Word 15.0 Object Library'.Selection    
//но как понимаете это не работает
lc_BodyTmpю='Первая строка'
WordSelect.TypeText:=lc_BodyTmp;    

//записать и закрыть
ApplicationWord.ActiveDocument.SaveAs (Имя Файла);
WordApplication.ActiveDocument.Close;
WordApplication.Quit;
CLEAR (WordApplication);

Помоги братцы, что я не так делаю, Тем более, что этот способ прекрасно работает в VB

И если вам не трудно, за одно как перевести в Нав, команды

Word.Selection.Font.Bold = True
Word.Selection.ParagraphFormat.Alignment = 2

Надеюсь, жду, спасибо

[soutsite]

Ну что сказать, я надеялся на ваши знания и очень удивлён,что никто не ответил. Жаль, попробую найдти другое решение. Спасибо и пока

[Yoil]

Включите запись макроса в ворде и сделайте нужные вам манипуляции там
Посмотрите макрос, воспроизведите действия в Наве

[gl00mie]

Я немного из другой песочницы, но неужели задача вывести что-то в шаблон Word настолько уникальна для NAV? В Аксапте есть штатные классы-обертки, есть примеры в стандартном приложении, где можно подсмотреть, "как правильно", и сделать то же самое, только меньше и другое.

[smoyk]

Я когда на форму зашел у вашего вопроса уже 2 недели прошло, я думал не актуально) Если еще зайдете, вот решение.

Что бы вывести текст в ворд надо поставить в нужное место закладку (мой способ, возможно и в произвольное место, но я таких способов не знаю). Закладку можно поставить 2мя способами: либо через вкладкуВставка -> Закладки, либо через вкладку Разработчик -> Формы предидущих версий -> Поле.
Далее в коде для первого случая

word	Automation	'Microsoft Word 14.0 Object Library'.Application	
range	Automation	'Microsoft Word 14.0 Object Library'.Range	
document	Automation	'Microsoft Word 14.0 Object Library'.Document	

CREATE(word,TRUE)

document := word.Documents.Open('Имя файла');

bookmark := bookmarks.Item('Имя закладки');
range := bookmark.Range();
range.Text('Текст');

document.FormFields.Shaded:=FALSE;
word.Visible(TRUE);

Для второго

WrdApp	Automation	'Microsoft Word 14.0 Object Library'.Application	
WrdDoc	Automation	'Microsoft Word 14.0 Object Library'.Document	
WrdFormFld	Automation	'Microsoft Word 14.0 Object Library'.FormField	
	
WrdDoc   := WrdApp.Documents.Open2000('Имя файла');

AuxTextString     := 'Имя поля';
WrdFormFld        := WrdDoc.FormFields.Item(AuxTextString);
WrdFormFld.Result := 'Текст';

WrdDoc.FormFields.Shaded := FALSE;
WrdApp.Visible := TRUE;
WrdApp.Activate;

С форматированием не разбирался, накладываю его сразу на установленные закладки.

ps У нас почему то часть одним способом сделана, часть другим) Сам не знаю почему...