| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
disk in cdrom [D5]
race1 © (2003-04-03 17:29:00)я определяю наличие диска в сидироме Findfirstom"ом. иногда этот метод срабатывает, функция возвращает ненулевое значение, всё ок.
но иногда винда изо всех сил кричит стандартными средствами типа нету диска, вставте диск. а мне хотельось бы всё по-тихому провернуть...
nikus (2003-04-05 11:19:00) [1]В соседней ветке нашёл:
© NightAngel (03.04.03 21:38)
Для Flopy/CD-ROM.
function isDiskinDrive(Drive:PChar):boolean;
var
VolumeName,FileSystemName: array [0..MAX_PATH-1] of Char;
VolumeSerialNo: DWord;
MaxComponentLength,FileSystemFlags: DWord;
ErrMode: Integer;
begin
Result:=GetVolumeInformation(Drive, VolumeName, MAX_PATH, @VolumeSerialNo,
MaxComponentLength, FileSystemFlags, FileSystemName, MAX_PATH);
SetErrorMode(ErrMode);
end;
DVM (2003-04-03 17:32:00) [2]{$i-}
попробовать обратиться к диску
{$i+}
| |
