Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.01.16;
Скачать: [xml.tar.bz2];

Вниз

Взаимодействие с 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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.008 c
6-49189
hedgehoge
2002-11-16 13:01
2003.01.16
CallBack DCOM


8-49168
sachem
2002-09-28 18:44
2003.01.16
как сделать , чтобы видео проигрывалось только моей программой


1-48982
mate
2003-01-06 15:02
2003.01.16
Word и Delphi


1-48999
Pasechnik
2003-01-07 02:36
2003.01.16
как отсечь #13#10 в конце строки


14-49266
Дмитрий К.К.
2002-12-27 06:09
2003.01.16
Именинники 27 декабря





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский