Как в Delphi определить, где установлена Windows?

Для определения директории установки Windows можно воспользоваться функцией
GetWindowsDirectory

Пример:

 
  var  Windir  : String;
       WindirP : PChar;
 
		     .  .  .  .  .
       WinDirP := StrAlloc(MAX_PATH);
 
       Res := GetWindowsDirectory(WinDirP, MAX_PATH);
 
       if Res > 0 then WinDir := StrPas(WinDirP);

Поддержка сайта

Последние комментарии

  • Мы предлагаем профессиональные услуги по взлому почтовых ящиков. Взлом происходит от одного часа до 10 дней, в зависимости как часто жертва проверяет почту. Пароль в любом случае остается неизменным, пользователь ничего не замечает, продолжая пользоваться почтой как обычно. Главной гарантией нашей...
  • [url=http:///].ankor[/url] .ankor
  • http://forum.duchody-duchodci.cz/posting.php?mode=post&f=6 http://forum.sledtell.com/member.php?action=profile&uid=880 http://www.indofeed.com/Autos/latest-car-news/ http://www.i-mrc.com/members/raymondalula/profile/ http://forum.rittolas.ch/memberlist.php?mode=viewprofile&u=8181 http...

Счетчики