Форум: "Система";
Текущий архив: 2003.11.24;
Скачать: [xml.tar.bz2];

Вниз

Пользователь   Найти похожие ветки 

← →
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;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.011 c