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

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

  • Забугоный блогер решил поделиться методом правильной уборки квартиры. модели секс смотреть смотреть бесплатно , фото порно взрослых и пожилых женщин http://devstvennici-porno.ru/
  • Hello. You are not right. I am assured. I can prove it. Write to me in PM, we will communicate. Welcome to my project skjdfbhjhbdhsy44fbdfhjdbfv
  • http://bit.ly/2ILfynJ - Рецепты

Счетчики