Делфи. Функция, возвращающая букву системного диска(раздела). Или как ее можно получить по-другому?

[быдлокодер]

Есть ли ф делфи какая-либо функция, возвращающая букву того раздела, на который установлена система?
Если нет, то как можно получить эту букву?

[Пепел Феникса]

function GetSystemDir:string;
begin
 SetLength(Result,256);
 SetLength(Result,GetSystemDirectory(PChar(Result),256));
end;

вот так получим путь к системной папке, извлечь имя диска сможете и сами.

[быдлокодер]

Аеее! Оно работает! Спасибо!)