Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Дискета [D6, Win95/98, WinXP]


Some1 ©   (2003-04-01 10:08:00) 

Как програмно определить, присутствует ли дискетка в дисководе (А:\)?


Palladin   (2003-04-04 22:17:00) [1]


> Some1 (03.04.03 12:05)

глупое существо...
метка обычный файл который ищется FindFirst в корневой директории диска...

faVolumeID + F1


Some1   (2003-04-04 11:42:00) [2]

NightAngel ПРОСТО ОГРОМНЕЙШЕЕ ТЕБЕ СПАСИБО! %)


NightAngel   (2003-04-03 21:38:00) [3]

>Some1
А самому хоть что-то делать?

Для 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;


Some1   (2003-04-03 12:05:00) [4]

2Palladin Код? Я мысли должен на расстоянии читать о том как
считывать эту метку???

2Holy В том то и дело что я обращаюсь к определённому файлу на
дискетке и вылетает еррор :(

2$hade GetDriveType - выдаёт тип диска, но не обращается к нему
и не проверяет его наличие. IsDriveValid - енто в каком юните???


$hade   (2003-04-01 10:29:00) [5]

WinAPI - GetDriveType,IsDriveValid ....помоему еще что-то было


Holy   (2003-04-01 10:13:00) [6]

Попробуй поискать на ней файлик *.* и если нашел тоо внутри


Palladin   (2003-04-01 10:12:00) [7]

считываешь метку дискеты...
если нечитается то, дискете капут или ее нет...


Наверх

Титульная страница Поиск, карта сайта Написать письмо