Verfasst: 29.05.2005 13:01
Thx @ all
aber bei mir lässt sich der taskmanager öffnen explorer wird nicht beendet Desktop icons bleiben heil, Man kann es nur nicht schliessen! Und das progg interessiert mich eigentlich auch nicht, eher die .dll
Das "Tool" ist nicht wirklich nettJa, wirklich Klasse, dieses "Tool".
Beendet explorer.exe, lässt Task-Manager nicht mehr starten.
Schließt Taskleiste.
Lässt sich nicht beenden, indem man auf das Kreuz klickt.
Lässt sich durch DestroyWindow nicht schließen.
Explorer.exe kann nicht neugestartet werden. Echt super!
Fehlt nur noch, dass sich das fuck Teil in Autostart eingetragen hat.
EDIT: Ach ja ganz vergessen: Die Desktop Icons werden zerstört.
Naja, nach einem Reboot geht aber wieder alles. Will nur hoffen,
dass der jetzt keine Dateien gelöscht hat.

Code: Alles auswählen
OpenWindow(0,200,200,220,30,#PB_Window_SystemMenu ,"Taskmanager unable to open")
CreateGadgetList(WindowID())
TextGadget(1,0,0,220,30,"Taskmanager kann nicht geöffnet werden! Und die Konsole ebenfalls nicht!",#PB_Text_Center)
Null.l=0
path$=Space(1000)
SHGetSpecialFolderLocation_(WindowID(),37,@Null)
SHGetPathFromIDList_(Null,@path$)
Repeat
EventID.l = WindowEvent()
If EventID = #PB_EventCloseWindow
Quit = 1
Else
taskmanager.l = FindWindow_(0,"Windows Task-Manager")
cmd.l = FindWindow_(0,path$+"\cmd.exe")
command.l = FindWindow_(0,path$+"\command.com")
If taskmanager.l<>0
PostMessage_(taskmanager,#WM_CLOSE,0,TRUE)
EndIf
If cmd.l<>0
PostMessage_(cmd,#WM_CLOSE,0,TRUE)
EndIf
;If command.l<>0 ---- kann probz verursachen!!!! command reagiert nicht mehr....
; PostMessage_(command,#WM_CLOSE,0,TRUE)
;EndIf
EndIf
Until Quit=1