Доступ к дополнительным свойствам файла в NTFS [D6, WinXP]
ShaggyDoc © (2002-09-20 11:38:00)
Как получить доступ к
значениямсвойств файла, отображающимся в стандартном диалоге
свойств?
Вызов диалога делается так
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:00) [1]
Так, никто не ответил. Это хорошо, значит ответ не на
поверхности.
Если кого еще это интересует, см.
http://www.planet-source-code.com/vb/scripts/ShowCode.asp?txtCodeId=658&lngWId=7
или
http://www.howtodothings.com/showarticle.asp?article=447
Наверх 
ЧАТ |
Орешник |
|
