Вверх ↑
Разработчик
Ответов: 26068
Рейтинг: 2121
#1: 2011-11-17 12:27:40 ЛС | профиль | цитата
CriDos, попробуй сделать так, посмотрим



Result := '';
WinVer := LOBYTE(LOWORD(GetVersion));
DriveType := GetDriveType(PChar(Drv + ':\'));

if not VolReal then
Result := '<none>'
else
Result := DisplayName(Drv);

карма: 22

0