Помогите! Как узнать букву системного диска?

← →
User.exe (2007-09-26 15:22) [0]

Я в этом деле новичок. Мне нужно узнать букву системного диска, т.е. там, где установлен Windows. Нашёл примерный код...
function GetWindowsDir: string; var S: array[0..MAX_PATH] of Char; begin GetWindowsDirectory(S,SizeOf(S)); Result:=S; end;
...но он определяет директорию винды, а мне нужно узнать сам диск.

Или подскажите как узнать директорию Program Files.

← →
stone © (2007-09-26 15:33) [1]

ExtractFileDrive
ну или тупо прочитать первую букву результата функции

> User.exe (26.09.2007 15:22:00) [0]

Буква часть имени. ExtractFileDrive

Помогите! Как узнать букву системного диска? Найти похожие ветки