Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Директория Windows [D7, WinXP]


Stype ©   (2005-02-08 17:23:00) 

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


Fay   (2005-02-09 03:39:00) [1]

2 Piter ©   (08.02.05 23:29) [7]
Директория с Windows - это GetWindowsDirectory


Fay   (2005-02-09 03:38:00) [2]

2 VMcL ©   (08.02.05 19:01) [2]
uSize
[in] Specifies the maximum size, in TCHARs, of the buffer specified by the lpBuffer parameter. This value should be set to MAX_PATH+1to allow sufficient space for the path and the null terminator.


VMcL   (2005-02-09 01:02:00) [3]

>> Piter ©   (08.02.05 23:29) [7]

В Win9x нет SystemRoot, есть только windir, AFAIR.


Piter   (2005-02-08 23:29:00) [4]

Директория с Windows это - %SystemRoot%


VMcL   (2005-02-08 22:51:00) [5]

>> rdm ©   (08.02.05 22:22) [5]

Так делать не следует. Переменную окружения можно изменить.


rdm   (2005-02-08 22:22:00) [6]

Caption := SysUtils.GetEnvironmentVariable('windir');


palva   (2005-02-08 19:12:00) [7]

Можно даже так:
{$APPTYPE CONSOLE}
uses windows;
var s: String;
begin
 SetLength(s, GetWindowsDirectory(PChar(s), 0));
 GetWindowsDirectory(PChar(s), Length(s));
 writeln(s);
end.


palva   (2005-02-08 19:07:00) [8]

OK


VMcL   (2005-02-08 19:01:00) [9]

>> palva ©   (08.02.05 18:48) [1]

Только не 250, а MAX_PATH.


palva   (2005-02-08 18:48:00) [10]

{$APPTYPE CONSOLE}
uses windows;
var s: String;
begin
 SetLength(s, 250);
 SetLength(s, GetWindowsDirectory(PChar(s), 250));
 writeln(s);
end.


Наверх

Титульная страница Поиск, карта сайта Написать письмо