Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.11.21;
Скачать: CL | DM;

Вниз

Доступ к дополнительным свойствам файла в 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



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

Текущий архив: 2002.11.21;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.018 c
14-69584
romych
2002-11-04 12:39
2002.11.21
Выбор Базы даных


1-69355
atmospheric
2002-11-11 01:05
2002.11.21
интеграция с Internet Explorer ?


1-69376
Ученик
2002-11-10 12:23
2002.11.21
31 число в какой декаде


1-69362
[NEW]Splinter
2002-11-10 10:40
2002.11.21
Как записать в exe-шник?


1-69257
123000
2002-11-11 18:12
2002.11.21
..::PWL::.. и этим все сказано