Как в 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);

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

  • привет всем всем,дайте совет где покупать колечки свадебные, подруга подсказала ювелирное производство интересные рекомендации на https://kupibril.ru/sovet_diamond и какие лучше из желтого золота или белого так то у них и сроки быстрые и ценник очень нормальный, хорошо что производитель, цена...
  • cbd tincture dosage http://bestcbdoil4pain.com - best cbd oil cbd health cbd - cbd amazon how to use cbd oil
  • Interesting Finds on AliExpress

Счетчики