Доступ к дополнительным свойствам файла в NTFS

← →
ShaggyDoc (2002-09-20 11:38) [0]

Как получить доступ к значениям свойств файла, отображающимся в стандартном диалоге свойств?

Вызов диалога делается так

procedure TFileInfo.DialogProperties; var sei: TShellExecuteInfo; begin FillChar(sei, SizeOf(sei), 0); sei.cbSize := SizeOf(sei); sei.lpFile := PChar(FFileName); sei.lpVerb := "properties"; sei.fMask := SEE_MASK_INVOKEIDLIST; ShellExecuteEx(@sei); end;

Имеются ввиду не свойства специфичных файлов (например WORD), и не структурированных данных, а те, что хранятся где-то в атрибутах в NTFS

← →
ShaggyDoc (2002-09-23 10:01) [1]

Так, никто не ответил. Это хорошо, значит ответ не на поверхности.

Если кого еще это интересует, см.

http://www.planet-source-code.com/vb/scripts/ShowCode.asp?txtCodeId=658&lngWId=7

или

http://www.howtodothings.com/showarticle.asp?article=447

Доступ к дополнительным свойствам файла в NTFS Найти похожие ветки