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

Вниз

документооборот   Найти похожие ветки 

 
Andrey2003   (2003-07-07 08:33) [0]

Здравствуйте уважаемые знатоки. Подскажите пожалуйста, как средствами Delphi собрать несколько вордовских документов в один документ. Про то что можно написать макрос я знаю, меня игнтересует как средствами Delphi это сделать. Заранее благодарен.


 
Ozone   (2003-07-07 09:37) [1]

Дык, смотри в макрос и пиши почти тоже самое в Delphi; смотри и пиши, смотри и пиши, смотри и пиши....


 
dim-   (2003-07-07 09:43) [2]

А зачем, если не секрет
а так если знаешь как макросом точно так же можно и через ОЛЕ


 
Andrey2003   (2003-07-07 09:46) [3]

да макрос сюда не очень красиво вписывается


 
Andrey2003   (2003-07-07 10:22) [4]

хорошо, попробую переформулировать вопрос:
как писать макросы для офиса на Delphi?
любой примерчик покажите пожалуйста.


 
Smithson   (2003-07-07 11:52) [5]


var S: String;
Word, Doc: Variant;
begin
// Выгрузить в Word
try
Word := GetActiveOLEObject("Word.Application"); // Открыть
except
Word := CreateOLEObject("Word.Application"); // Или создать
end;
S := ExpandFileName("reference.html");
Doc := Word.Documents.Open(S); // Загрузить
S := ChangeFileExt(S, ".doc");
DeleteFile(S);
Doc.SaveAS(S,0); // Сохранить
Word.Visible := True; // Показать


 
Andrey2003   (2003-07-07 13:10) [6]

спасибо большое, кое что проясняется.



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

Форум: "Основная";
Текущий архив: 2003.07.21;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.007 c
14-67977
vopros
2003-07-07 10:42
2003.07.21
Как открыть запороленный архив RAR?


3-67685
bushmen
2003-06-26 16:22
2003.07.21
XML


14-68070
SergP
2003-07-04 20:34
2003.07.21
Как засчитывается посещение сайта?


11-67742
Ал
2002-11-16 23:25
2003.07.21
Pbitmap.ScanLine не работает!


6-67937
tovSuhov
2003-05-15 12:37
2003.07.21
Форматы ответов на команду LIST для FTP серверов.





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