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

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

Форматирование дисккеты [D6, Win95/98]


Skif ©   (2002-09-10 04:40:00) 

Доброе время суток, Дамы и Господа. Кто знает, как отформатировать дискету?


_pavel_   (2002-09-10 09:55:00) [1]

procedure TMainFrm.FormatDiskMnuClick(Sender: TObject);
var FmtRes : longint;
const
SHFMT_ID_DEFAULT = $FFFF;
// Опции форматирования
SHFMT_OPT_QUICKFORMAT = 0;
SHFMT_OPT_FULL = 1;
SHFMT_OPT_SYSONLY = 2;
// Коды ошибок
SHFMT_ERROR = -1;
SHFMT_CANCEL = -2;
SHFMT_NOFORMAT = -3;
begin
FmtRes := SHFormatDrive(Handle, 0, SHFMT_ID_DEFAULT, SHFMT_OPT_FULL);
end;


Ученик   (2002-09-10 09:50:00) [2]

http://support.microsoft.com/default.aspx?scid=KB;EN-US;Q173688&


ЮЮ   (2002-09-10 07:59:00) [3]

>format a:


Наверх

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