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

Как определить путь к " Program Files " в XP?   Найти похожие ветки 

← →
Тоха ©   (2006-06-29 11:25) [0]

Вот приспичило. Подскажыте плиз как определить путь к "\Program Files\" в XP?если не трудно то с римерчиком.
Для меня WinAPI тёмный и злой лес. %(

---

← →
Плохиш ©   (2006-06-29 11:29) [1]

http://www.swissdelphicenter.ch/de/showcode.php?id=233

---

← →
Amoeba ©   (2006-06-29 11:44) [2]

> Плохиш ©   (29.06.06 11:29) [1]
> http://www.swissdelphicenter.ch/de/showcode.php?id=233


Путь к "\Program Files\" это не покажет, а покажет всего лишь путь к папке, где хранятсь ярлыки из соответствующего раздела меню "Пуск".

Кроме того, папок "\Program Files\" запросто может быть и больше одной, т.е. не только одна единственная папка на логическом диске C:.

---

← →
DrPass ©   (2006-06-29 11:49) [3]

> Amoeba ©   (29.06.06 11:44) [2]

Сколько бы ты папок с таким именем не наделал, системная папка для установки программ по умолчанию будет только одна. И, кстати, указанный пример ее тоже находит

---

← →
PSPF2003 ©   (2006-06-29 11:56) [4]

А разве по реестру нельзя?

RootKey := HKEY_LOCAL_MACHINE;
OpenKey("Software\Microsoft\Windows\CurrentVersion\", False);
ReadString("ProgramFilesDir");

---

← →
Loginov Dmitry ©   (2006-06-29 13:23) [5]

> Как определить путь к "\Program Files\" в XP?


Очень просто:

procedure TForm1.Button1Click(Sender: TObject);
var
 S: string;
begin
 SetLength(S, 255);
 ExpandEnvironmentStrings("%ProgramFiles%", PChar(S), 255);
 Caption := S;
end;

---

← →
Тоха ©   (2006-06-29 13:25) [6]

> PSPF2003

Спсибо, попробую. Риально в реестре все валяется.
Век живу - век учусь.

---

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

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



Память: 0.46 MB
Время: 0.025 c