Текущий архив: 2003.11.24;
Скачать: CL | DM;
Вниз
Пользователь Найти похожие ветки
← →
bon (2003-09-15 14:06) [0]Господа МАСТЕРА!
Как определить системную папку текущего профиля пользователя?
← →
[lamer]Barmaglot © (2003-09-15 14:12) [1]SHGetSpecialFolderLocation?
← →
bon (2003-09-15 14:15) [2]А примерчик есть?
← →
[lamer]Barmaglot © (2003-09-15 14:27) [3]Например так...
Uses ShlObj;
procedure TForm1.Button1Click(Sender: TObject);
var
PIIDL: PItemIDList;
s: array[0..2048] of Char;
begin
SHGetSpecialFolderLocation(Form1.handle, CSIDL_PROGRAMS, PIIDL);
SHGetPathFromIDList(PIIDL, s);
Edit1.text:=s;
end;
← →
clickmaker © (2003-09-15 14:27) [4]SHGetSpecialFolderPath
← →
bon (2003-09-15 15:39) [5]Спасибо всем кто ответил! Очень помогло!!!
Страницы: 1 вся ветка
Текущий архив: 2003.11.24;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.028 c
