Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.01.16;
Скачать: CL | DM;

Вниз

Взаимодействие с MS Office   Найти похожие ветки 

 
Alex S ©   (2003-01-04 15:15) [0]

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

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


 
Opuhshii ©   (2003-01-04 15:49) [1]

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,..


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

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


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

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



Страницы: 1 вся ветка

Текущий архив: 2003.01.16;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.019 c
8-49167
a_n_t
2002-09-27 14:05
2003.01.16
Проигрывание MOD


3-48893
xenon
2002-12-20 09:54
2003.01.16
Передача параметра в MDIChild


1-49057
vvv2002
2003-01-08 12:23
2003.01.16
Форматирование текста


1-49033
HardClubber
2003-01-06 00:07
2003.01.16
Mailslot


7-49333
Koster
2002-11-04 09:31
2003.01.16
Физический доступ к носителю