Текущий архив: 2003.06.09;
Скачать: CL | DM;
Вниз
disk in cdrom Найти похожие ветки
← →
race1 © (2003-04-03 17:29) [0]я определяю наличие диска в сидироме Findfirstom"ом. иногда этот метод срабатывает, функция возвращает ненулевое значение, всё ок.
но иногда винда изо всех сил кричит стандартными средствами типа нету диска, вставте диск. а мне хотельось бы всё по-тихому провернуть...
← →
DVM © (2003-04-03 17:32) [1]{$i-}
попробовать обратиться к диску
{$i+}
← →
nikus © (2003-04-05 11:19) [2]В соседней ветке нашёл:
© 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;
Страницы: 1 вся ветка
Текущий архив: 2003.06.09;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.028 c