Вниз
Скачать: CL | DM;

Стандартные папки Windows   Найти похожие ветки 

 
Oyster ©   (2005-01-20 12:35) [0]

Как узнать физический путь к папкам History, Temporary Internet Files, Recent, Temp, Cookies?


 
Вариант ©   (2005-01-20 12:46) [1]

uses
 ActiveX, ShlObj;

procedure GetPath(name: integer);
var
 Allocator: IMalloc;
 SpecialDir: PItemIdList;
 FBuf: array[0..MAX_PATH] of Char;
 PerDir: string;
begin
 if SHGetMalloc(Allocator) = NOERROR then
 begin
   SHGetSpecialFolderLocation(Form1.Handle, name, SpecialDir);
   SHGetPathFromIDList(SpecialDir, @FBuf[0]);
   Allocator.Free(SpecialDir);
   ShowMessage(string(FBuf));
 end;
end;

Переменной присваивай одно из значений слудующих констант:
 CSIDL_DESKTOP
 CSIDL_INTERNET
 CSIDL_PROGRAMS
 CSIDL_CONTROLS
 CSIDL_PRINTERS
 CSIDL_PERSONAL
 CSIDL_FAVORITES
 CSIDL_STARTUP
 CSIDL_RECENT
 CSIDL_SENDTO
 CSIDL_BITBUCKET
 CSIDL_STARTMENU
 CSIDL_DESKTOPDIRECTORY
 CSIDL_DRIVES
 CSIDL_NETWORK
 CSIDL_NETHOOD
 CSIDL_FONTS
 CSIDL_TEMPLATES
 CSIDL_COMMON_STARTMENU
 CSIDL_COMMON_PROGRAMS
 CSIDL_COMMON_STARTUP
 CSIDL_COMMON_DESKTOPDIRECTORY
 CSIDL_APPDATA
 CSIDL_PRINTHOOD
 CSIDL_ALTSTARTUP
 CSIDL_COMMON_ALTSTARTUP
 CSIDL_COMMON_FAVORITES
 CSIDL_INTERNET_CACHE
 CSIDL_COOKIES
 CSIDL_HISTORY
Т.е. name:=CSIDL_HISTORY;
По названию константы разберёшься, что она показывает.



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.021 c
14-1105251405
Бугага
2005-01-09 09:16
2005.01.30
Мужчина - женщина - блондинка :)


3-1104082158
VictorT
2004-12-26 20:29
2005.01.30
выборка из двух таблиц с идентичной структурой (не обьединение)


1-1106052970
UserCP
2005-01-18 15:56
2005.01.30
Динамическое создание форм CreateForm


14-1105516116
Anonimus
2005-01-12 10:48
2005.01.30
Windows XP home


4-1102869574
Evgeny2004
2004-12-12 19:39
2005.01.30
WinAPI




   Наверх