![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Директория 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.