Delphi-PRAXiS - Windowsornder löschen (Fake)

Ich habe mal ein ganz sinnloses Fakeprogramm geschrieben (WinDel), welches das löschen des Windowsordners simuliert.
Anfangs gibt es eine Löschfrage, wenn man auf "Nein" drückt passiert das gleiche, wie wenn man auf "Ja" drückt,nämlich das gerade erwähnte Fakelöschen. Dieses Fakelöschen dauert 40 Sekunden und das Programm wird dann beendet. Es ist auch unmöglich das Programm zu beenden, außer über den Taskmanager:

Dies ist eine sehr frühe Version und voralledem eine Verbesserungswürdige Betaversion.

Schaut euchs bitt mal an und sagt mir Fehler und Verbesserungsvorschläge

Viel Spass UC

[edit=Admin]Dieses Attachment habe ich erstmal entfernt. Auch wenn es sich tatsächlich um ein harmloses Fake-Programm handelt, ist es nicht ganz die Sorte an Freeware, die ich hier haben möchte. Geschlossen.[/edit]