Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Передача данных из Delphi в MS Word, что не так делаю ? [D6, Win2k]

Veles © (2003-01-16 10:39:00)
procedure TForm1.Button1Click(Sender: TObject);
var
MSWord: Variant;
begin
try
MsWord := GetActiveOleObject("Word.Application");
except
try
MsWord := CreateOleObject("Word.Application");
MsWord.Visible := True;
except
Exception.Create("Error");
end;
end;
MSWord.Documents.Open("C:\ex.doc");
{MSWord.Selection.Font.Size := 12;}
MSWord.Selection.TypeText("###M1&","первое поле");
MSWord.Selection.TypeText("###M2&","второе поле");
MSWord.Selection.TypeText("###M3&","третье поле");
MSWord.Selection.TypeText("###M4&","четвертое поле");
MSWord.Selection.TypeText("###M5&","пятое поле");
MSWord.ActiveDocument.SaveAs("C:\ex1.doc");
end;

Документ с шаблоном открывается, затем выдается сообщение:
"Неопознанная ошибка"

Calm (2003-01-16 11:38:00) [1]
Попробуй через интерфейсы, а не через OLE.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »