Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.01 c