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

Вниз

Как узнать открыт ли в MS Word файл ?   Найти похожие ветки 

 
AlexGof   (2003-05-26 16:29) [0]

Как узнать открыт ли в MS Word файл с заданным именем и как закрыть его ?


 
WSILL   (2003-05-26 17:32) [1]

Примерно вот так :



var
IWApp : Word97.TWordApplication;

...

procedure CloseDoc(Doc_Name : string);
var
i : OleVariant;
begin
i:=1;
while i<=IWApp.Documents.Count do
begin
if IWApp.Documents.Item(i).Name=Doc_Name then
begin
IWApp.Documents.Item(i).Close(EmptyParam, EmptyParam, EmptyParam);
break;
end;
inc(i);
end;
end;





 
kamkad3e   (2003-05-26 21:00) [2]

спасибо. а может еще кто чего посоветует


 
AlexGof   (2003-05-27 10:11) [3]

Все хорошо, спасибо, но где найти параметры на вот эту функцию закрытия Word документа : Close(EmptyParam, EmptyParam, EmptyParam), какие EmptyParam передавать ? В справке Worda по VB только название констант этих параметров, Дельфя их не понимает естественно, а где взять их числовое значение ?


 
kamkad3e   (2003-05-28 00:25) [4]

числовые константы можно посмотреть в том же msdn, или в файле word97.pas или word2000.pas.


 
Пубертанец   (2003-05-28 09:22) [5]

Дельфя понимает EmptyParam, только в uses включай Variants



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

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

Наверх





Память: 0.45 MB
Время: 0.009 c
3-26362
Till
2003-05-20 13:51
2003.06.09
Странно первый раз добавляеться а потом уже не хочет :((


8-26613
farhad
2003-02-26 11:49
2003.06.09
Вопрос для настоящих программистов!


14-26792
Might
2003-05-23 17:06
2003.06.09
Построение графического редактора


1-26540
Zilog
2003-05-27 09:43
2003.06.09
Требуется вести журнал. Строчка в журнале может быть разного...


14-26677
Yr2
2003-05-24 17:22
2003.06.09
Компонент для отображения многокадрового GIF (анимация)





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