Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Потрепаться";
Текущий архив: 2003.03.03;
Скачать: [xml.tar.bz2];

Вниз

FORMAT C:   Найти похожие ветки 

 
xoxol   (2003-02-11 06:27) [0]

можно как нибудь отформатировать диск из моей проги(как стандартный диалог вызвать я знаю)
чтобы все это отображалось на прогрес баре


 
Format G:   (2003-02-11 09:18) [1]

вирус? :))


 
Anatoly Podgoretsky   (2003-02-11 09:23) [2]

Из твоей не надо, нажми правую кнопку мышки на дисководе и выбери Format (для 9x) и все это будет с прогресс баром.


 
Spartak   (2003-02-11 09:52) [3]

xoxol если ты пишешь чтото на нодобии вируса то не ищи ответ сдесь ! сдесь не любят вирусы и тому подобные программы !
я уже пробовал спрашивать : сначала меня послали а затем модератор закрыл тему. он наверное и этот ответ отредактирует !
если ты увлекаешся плохими программами то пиши мне x_user_x@mail.ru там и поговорим !

** Spartak ***


 
xoxol   (2003-02-11 10:10) [4]

ЭТО НЕ ДЛЯ ВИРУСА ЧЕСНОЕ ПИОНЕРСКОЕ!!!
{раздел реализации}
..
..
const

SHFMT_ID_DEFAULT = $FFFF;
// Опции форматирования
SHFMT_OPT_QUICKFORMAT = $0000;
SHFMT_OPT_FULL = $0001;
SHFMT_OPT_SYSONLY = $0002;
// Коды ошибок
SHFMT_ERROR = $FFFFFFFF;
SHFMT_CANCEL = $FFFFFFFE;
SHFMT_NOFORMAT = $FFFFFFFD;

function SHFormatDrive(Handle: HWND; Drive, ID, Options: Word): LongInt;

stdcall; external "shell32.dll" name "SHFormatDrive"

procedure TForm1.btnFormatDiskClick(Sender: TObject);
var

retCode: LongInt;
begin

retCode:= SHFormatDrive(Handle, 0, SHFMT_ID_DEFAULT,
SHFMT_OPT_QUICKFORMAT);
if retCode < 0 then
ShowMessage("Не могу отформатировать накопитель");
end;

end.
кроме этого подскажите чтонибудь плиззззззззззз
З.Ы Spartak © стучись на асю 3777744


 
xoxol   (2003-02-11 10:14) [5]

З.З.Ы Для вируса я просто или потру все *.EXE или поменяю их на свой файлик (также с остальными расширениями).
Вообще мне нужно дискету форматировать


 
Spartak   (2003-02-11 10:19) [6]

видел гдето пример формата дискеты ! но на паскале ! поищи на сайтах посвящённых не delphi а паскалю ! удачи.


 
Anatoly Podgoretsky   (2003-02-11 10:25) [7]

xoxol © (11.02.03 10:14)
Не заливай, дискета и на C:


 
Smashich   (2003-02-11 10:35) [8]

>Anatoly Podgoretsky © (11.02.03 10:25)
>>xoxol © (11.02.03 10:14)
>Не заливай, дискета и на C:

тов. цензоры! ну скока можна жи? a если человек хочет написать собственный PQ Magic? а если не знаешь, так не надо вот этого..предстаь все справки из милиции что ты не состоишь на учете и тогда я может быть подумаю об ответе, уж очень ты подозрительный тип...


 
Anatoly Podgoretsky   (2003-02-11 10:44) [9]

Он не хочет PQ Magic, он хочет отформатировать дискету на C:


 
TaZarey   (2003-02-11 22:21) [10]

Привет всем!!!
А я делал не так, генерировал файл с раширением *.bat и запускал его через exec, файл имел такое содержание:
echo y | format c: /q /u /v:autotest
Атрибуты формат найдеш в хелпе...
Привет:-))))


 
woland   (2003-02-11 23:11) [11]

>Anatoly Podgoretsky ©
xoxol прав. Вирус можно написать и без формата.


 
Pat   (2003-02-12 00:15) [12]

>TaZarey © (11.02.03 22:21)
еще скажи, что это работало.. :-)
Пока винт используется формат не пойдет.


 
Polevi   (2003-02-12 09:34) [13]

детский сад


 
fooga   (2003-02-13 22:29) [14]

Удалено модератором
Примечание: Личная переписка


 
panov   (2003-02-13 22:41) [15]

Кошмар...



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

Форум: "Потрепаться";
Текущий архив: 2003.03.03;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.47 MB
Время: 0.009 c
1-5586
kaif
2003-02-19 03:26
2003.03.03
Коллекция или компонент-контейнер?


3-5380
AGAMEMNUM
2003-02-12 08:14
2003.03.03
Русские буквы в IB


1-5614
Kair
2003-02-20 05:32
2003.03.03
OpenDialog


1-5533
Kurt_
2003-02-21 11:24
2003.03.03
Люди, подскажите как сделать на форме чтоб BitBtn по нажатию гор


1-5616
Zn
2003-02-20 09:57
2003.03.03
Отображение текста в StatusBar - нет на других машинах.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский