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

Вниз

Как быстро получить список авторов списка файлов   Найти похожие ветки 

 
Genie™   (2005-06-12 17:48) [0]

Имеется список из около сотни doc-файлов. Как получить список всех авторов этих файлов. Нужно определять очень быстро.


 
Ученик   (2005-06-12 18:05) [1]

http://support.microsoft.com/default.aspx?scid=kb;en-us;186898


 
GenieTM   (2005-06-12 18:09) [2]

Как это реализовать в Delphi?


 
Eraser ©   (2005-06-12 18:11) [3]

GenieTM   (12.06.05 18:09) [2]

Проще написать dll с этим кодом на C++ и импортировать в делфивское приложение... ) имхо конечно.


 
Ученик   (2005-06-12 18:17) [4]

>GenieTM   (12.06.05 18:09) [2]
Поиск :-)
http://www.howtodothings.com/ViewArticle.aspx?article=300


 
Eraser ©   (2005-06-12 18:26) [5]

Ученик   (12.06.05 18:17) [4]

Гы... ну и или так ;-)


 
GenieTM   (2005-06-12 21:01) [6]

А можно конкретный пример?


 
Ученик   (2005-06-12 21:56) [7]

>GenieTM   (12.06.05 21:01) [6]
Этот пример не работает ?


 
GenieTM   (2005-06-12 22:45) [8]

>Ученик   (12.06.05 21:56) [7]
"Не удаётся выполнить требуемую операцию"


 
Ученик   (2005-06-12 23:04) [9]

>GenieTM   (12.06.05 22:45) [8]

Выдало "Ошибка проверки диапазона" :-(, попробуйте заменить


             OleCheck(StgOpenStorageEx(PWideChar(FileName),
             STGM_READ or STGM_SHARE_DENY_WRITE,
             STGFMT_FILE,
             0, nil, nil, @IID_IPropertySetStorage, stg));

на
              OleCheck(StgOpenStorage(PWideChar(FileName),
                         nil, STGM_READ or STGM_SHARE_DENY_WRITE,
                         nil, 0, Stg));



у меня заработало


 
GenieTM   (2005-06-12 23:16) [10]

Спасибо. Заработало



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

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

Наверх




Память: 0.46 MB
Время: 0.035 c
1-1118636023
Bagdat
2005-06-13 08:13
2005.07.11
Переход на следущую страницу в Excel-е


1-1119358062
Jolik
2005-06-21 16:47
2005.07.11
Отлов обработанных исключений...


6-1112888304
Egorr
2005-04-07 19:38
2005.07.11
Шифрование траффика-TIdMappedPortTCP


14-1118524157
u-12
2005-06-12 01:09
2005.07.11
Помогите разобраться с датакабелем Самсунга


1-1118746336
Define
2005-06-14 14:52
2005.07.11
Можно ли программно сделать DragDrop объекта





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