• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 663
  • Last Modified:

format an active drive (+500)

Hi,
how i can format my Active partition which contain windows folder! ?
this is like to that we say everybody want to kill her/him self! so i think there is a way to format an active drive from itself!

everybody can help me please
Thanks you very much.

regards,
Amir
0
Amir Azhdari
Asked:
Amir Azhdari
  • 4
  • 4
  • 3
  • +3
1 Solution
 
mokuleCommented:
Are we suppose to test it ? :)
0
 
Ivanov_GCommented:

   Mokule, you have quite destructive ideas ... :)))))))

   Anyway, I don't think this is possible.

   One possible solution :))))

   1) preare virtual RAM drive with system files (file Win98 start-up disk)
   2) replace the bootsector to load your program
   3) execute "format c:\"

   Enjoy

   
0
 
Amir AzhdariAuthor Commented:
Ivanov_G
think that you created a huge Application and you wanna protect that from another copies
so you can't restart the computer and give a message to user that want to insert startup-98 disk :))
'Please <-- insert win98 Startup Disk , i want to damage track0!!!':))

but i'm sure everything is possible :)

standing by for comments...
0
Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 
Amir AzhdariAuthor Commented:
i'll increase the points to 1500

not bad to lose all your data and get (1500 points = 6000 expert points ) :))

Regards
Azhdari
0
 
Ivanov_GCommented:

   Well, you try to erase from here FAT Cyl 0 Side 1 Sec 0  offset 0x27 - to erase the FAT .... but for the active partition ... I doubt you can make it.

   Routine for Drive Format :
   ---------------------------------------------
function SHFormatDrive(hWnd : HWND;
                       Drive : Word;
                       fmtID : Word;
                       Options : Word) : Longint
stdcall; external 'Shell32.dll' name 'SHFormatDrive';

procedure TForm1.Button4Click(Sender: TObject);
const
  SHFMT_DRV_A = 0;
  SHFMT_DRV_B = 1;
  SHFMT_ID_DEFAULT = $FFFF;
  SHFMT_OPT_QUICKFORMAT = 0;
  SHFMT_OPT_FULLFORMAT = 1;
  SHFMT_OPT_SYSONLY = 2;
  SHFMT_ERROR = -1;
  SHFMT_CANCEL = -2;
  SHFMT_NOFORMAT = -3;
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('Drive is not formatable')
  else
    ShowMessage('Disk has been formatted');
  end;
 except
  ShowMessage('Error occurred!')
 end;
end;

  --------------------------------------------------------
  and a link :
 
   http://www.howtodothings.com/showarticle.asp?article=20

  Anyway, I don't think you will be able to format the active partition ....
 
0
 
Ferruccio AccalaiSenior developer, analyst and customer assistance Commented:
Just to say that i won't give an answer to this question, because the intention is to start an auto-formatting hard-disk partitions....To protect your huge Application from copying you should move your ideas to a Hardware Key protection...I never agree with a  formatting to prevent program duplication....
0
 
Amir AzhdariAuthor Commented:
Ivanov_G
it doesen't work for the active partition. shell32.dll isn't contain routin that can do that.
0
 
Ivanov_GCommented:

   I told you .... you can not delete the active partition .... It seems really impossible ....
0
 
robert_marquardtCommented:
As a protection for a huge program it is also illegal.
You may destroy valuable data.
0
 
Ferruccio AccalaiSenior developer, analyst and customer assistance Commented:
Ok for me to PAQ adding an UPPERCASE NOTICE that this is a bad and somewhere ILLEGAL way to develop application protections.

F68 ;-/
0
 
Ivanov_GCommented:

  sure.
0
 
robert_marquardtCommented:
Agree.
0
 
Amir AzhdariAuthor Commented:
ok , sorry
thanks for all the comments

kretzschmar
delete the question and refund the points please
thanks

AmirAzhdari
0
 
Ferruccio AccalaiSenior developer, analyst and customer assistance Commented:
I agree with point refunding, but not so much on deleting, because, as the Delphi Programming  P.E. also said, it'd be a good advice for future askers with the same intention....
So my suggestion is to PAQ and refund with specified comment by the Moderator about the Member agreement violation of this question...
0
 
moduloCommented:
Closed, 500 points refunded.

modulo
Community Support Moderator
Experts Exchange
0

Featured Post

[Webinar] Cloud and Mobile-First Strategy

Maybe you’ve fully adopted the cloud since the beginning. Or maybe you started with on-prem resources but are pursuing a “cloud and mobile first” strategy. Getting to that end state has its challenges. Discover how to build out a 100% cloud and mobile IT strategy in this webinar.

  • 4
  • 4
  • 3
  • +3
Tackle projects and never again get stuck behind a technical roadblock.
Join Now