| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как получить имя автора из doc файла?

Genie™ ©   (2005-05-26 22:45:00) 

C помощью каких компонент и каким образом можно получить некоторые атрибуты doc-овских файлов, такие автор и тп?
Спасибо.

---

GanibalLector   (2005-05-27 02:46:00) [1]

Последний автор(редактируемый текст) : wdPropertyLastAuthor

---

GanibalLector   (2005-05-27 02:45:00) [2]


 var WordApp:Variant;
begin
  WordApp := CreateOleObject('Word.Application');
  try
    Wordapp.Visible:=False;
    WordApp.Documents.Open('C:\2.doc');
    MessageDlg(WordApp.ActiveDocument.BuiltInDocumentProperties[wdPropertyAuthor],MtInformation,[MbOk],0);
    WordApp.ActiveDocument.Close;
    WordApp.Quit;
 finally
    WordApp:=UnAssigned;
 end;
end;


---

Наверх