| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Помогите! Как узнать букву системного диска? [D7, XP]
User.exe © (2007-09-26 15:22:00)Я в этом деле новичок. Мне нужно узнать букву системного диска, т.е. там, где установлен Windows. Нашёл примерный код...
function GetWindowsDir: string;
var S: array[0..MAX_PATH] of Char;
begin
GetWindowsDirectory(S,SizeOf(S));
Result:=S;
end;
...но он определяет директорию винды, а мне нужно узнать сам диск.
Или подскажите как узнать директорию Program Files.
Anatoly Podgoretsky (2007-09-26 15:55:00) [1]> User.exe (26.09.2007 15:22:00) [0]
Буква часть имени. ExtractFileDrive
stone (2007-09-26 15:33:00) [2]ExtractFileDrive
ну или тупо прочитать первую букву результата функции
| |
