Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.02.03;
Скачать: CL | DM;

Вниз

Format A:   Найти похожие ветки 

 
FoxM   (2002-11-23 21:48) [0]

Как мне при нажатии кнопки на форме проверить есть ли дискета в дисководе и если есть то отформатировать ее


 
Marcus   (2002-11-25 11:34) [1]

Проверка наличия диска

OldErrMode := SetErrorMode(SEM_FAILCRITICALERRORS);
DiskExists := SetCurrentDirectory("A:\");
SetErrorMode(OldErrMode);

Для форматирования можно юзать недокументированную ф-ию SHFormatDrive из shell32.dll

function SHFormatDrive(hwndOwner: HWND; DiskNum: integer; Param1: integer; Param2: integer): integer; stdcall;

DiskNum: 0 - A, 1 - B и т.д.



Страницы: 1 вся ветка

Текущий архив: 2003.02.03;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.012 c
14-5166
Adolf
2003-01-17 20:28
2003.02.03
Component


8-5072
Е.М. Саша
2002-10-18 22:50
2003.02.03
Компонент для проигрывания MIDI


14-5189
Big_Rom
2003-01-14 14:29
2003.02.03
epson stylus 200


3-4710
mate
2003-01-18 09:36
2003.02.03
Обновление Query


14-5252
Olesia_K
2003-01-14 16:15
2003.02.03
FastNet 6.2.1 for Delphi 6