Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Взаимодействие с MS Office


Alex S ©   (2003-01-04 15:15:00) 

здравствйте всем. У меня прпоблема с нехваткой информации по работе с офисными приложениями. Вот этот простой пример (взятый из книги) для меня почему не работает.
var
varw:variant;
begin
Varw:=CreateOleObject("Word.Basic");
VarW.FileNew;
VarW.Insert("Hi");
end;

При выполнении этой процедуры, word повисает в task manager и загружает cpu на 100%. Почему?
А вообще мне надо реализовать приаттачивание файлика к новому письму в MS Outlook.
Если у кого есть какие нибудь примеры работы с Outlook или другими офис прогами, пришлите please. Подскажите , где можно найти доку? Спасибо.


asmith   (2003-01-04 18:33:00) [1]

Читай тут: http://www.djpate.freeserve.co.uk/Automation.htm


Alex S   (2003-01-04 16:32:00) [2]

Так подскажите где найти эти статьи в инете...


Opuhshii   (2003-01-04 15:49:00) [3]

c "нехваткой информации по работе с офисными приложениями" можно бороться с помощью соответсвующих книг, статей, MSDN,.. и т.д. и т.п.. так же хорошо помогает запись макросов и изучение сгенерированого кода,.. например если записать макрос, во время записи которого создать новую книгу, и в ячейке А1 написать Hello World,.. то получим код:


Workbooks.Add
ActiveCell.FormulaR1C1 = "Hello World"
Range("A2").Select


соответственно примерно так код будет выглядеть для Дельфи:


var
XL:Variant;
SH:Variant;
begin
XL:=CreateOleObject("Excel.Application");
XL.Visible := True;
XL.WorkBooks.Add;
XL.ActiveCell.FormulaR1C1 := "Hello World";
end;


CreateOleObject объявлена в ComObj,..


Наверх

Титульная страница Поиск, карта сайта Написать письмо