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

Вниз

CreateOleObject   Найти похожие ветки 

 
шнур ©   (2004-09-12 14:56) [0]

Запускаю  CreateOleObject ("word.basic")
........
........
Здесь нужно закрыть
v := unassigned; не помогает!!!!
По закрытию приложения в памяти висит WINWORD.exe, мне это не нужно!!!
Напишите если кто то сталкивался с такой проблемой!!!


 
Семен Сорокин ©   (2004-09-12 15:02) [1]

скорее всего объект "word.basic" неявно создает объект "word.application" и хранит в себе ссылку на него, тебе явно надо вызвать либо что-то наподобие метода Quit либо уменьшить количество ссылок на "word.application".


 
шнур ©   (2004-09-12 15:14) [2]

А может подскажите лучше, как отправить вордовский лист на печать


 
Семен Сорокин ©   (2004-09-12 15:18) [3]

шнур ©   (12.09.04 15:14) [2]
А может подскажите лучше, как отправить вордовский лист на печать


1. Запускаешь Word, далее Tools->Macro->Record New Macro...
2. Делаешь необходимые действия (Отправляешь вордовский лист на печать)
3. Останавоиваешь запись макроса
4. Смотришь код, адаптируешь под Delphi


 
шнур ©   (2004-09-12 15:21) [4]

Да я как бы так и делал. Отправляется нормально, но процесс потом висит


 
Profi ©   (2004-09-12 16:42) [5]

шнур ©   (12.09.04 14:56)
v.quit


 
шнур ©   (2004-09-12 16:56) [6]

уже пробывал, кидает ошибку


 
Profi ©   (2004-09-12 17:00) [7]

Profi ©   (12.09.04 16:42) [5]
Вот например так я достаю данные из Excel:
Uses Comobj;
var
ex:variant;
begin
ex:=createoleobject("Excel.Application);
ex.workbooks.open(od.FileName);
tab.Cells[j-1,i-8].Text:=ex.sheets[3].cells[i,j].text;
ex.quit;


 
шнур ©   (2004-09-12 17:02) [8]

я так и делал, но пишет, что метод не тот


 
Profi ©   (2004-09-12 17:03) [9]

шнур ©   (12.09.04 17:02) [8]
На какой строке?


 
шнур ©   (2004-09-12 17:04) [10]

v.quit


 
шнур ©   (2004-09-12 17:08) [11]

Пробывал отправлять на печать так:
shellexecute(handle,"print", "c:\1.doc",nil,nil,sw_hide)
Но окна вордовские появляются, а это не устраивает
Может кто подскажет как нужно, чтобы не видно было этих окон


 
Profi ©   (2004-09-12 17:10) [12]

шнур ©   (12.09.04 17:08) [11]
Последний параметр 0!


 
шнур ©   (2004-09-12 17:13) [13]

Дохлый номер, лезет и все тут


 
Profi ©   (2004-09-12 17:15) [14]

шнур ©   (12.09.04 17:13) [13]
Должно работать! 0 - означает "не прорисовывать окно"!


 
шнур ©   (2004-09-12 17:17) [15]

Ну вот так глупо получается. С обеда проблемму не могу решить



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

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

Наверх




Память: 0.47 MB
Время: 0.043 c
14-1094234338
Profi
2004-09-03 21:58
2004.09.26
Работа с внешними устройствами


1-1094807172
Zhekson
2004-09-10 13:06
2004.09.26
Центрирование в Мемо


3-1093867645
Yrtimd
2004-08-30 16:07
2004.09.26
Что такое FireBird?


6-1089857582
BoxTer
2004-07-15 06:13
2004.09.26
Проблема с TServerSocket


9-1085601029
GuAV
2004-05-26 23:50
2004.09.26
TBitmap поверх DirectX





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский