Delphi-PRAXiS
Seite 3 von 3     123   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi ALT + F4 Ausschalten (https://www.delphipraxis.net/22548-alt-f4-ausschalten.html)

NicoDE 8. Jun 2004 09:13

Re: ALT + F4 Ausschalten
 
Zitat:

Zitat von Luckie
Den Code will ich sehen, der unter NT ff. funktioniert.

Gibt es tatsächlich, allerdings braucht man dann das Debug-Recht (= Master of the Universe) oder es funktioniert nur mit dem Standard-TaskManager...
...wie auch immer, es gibt Möglichkeiten die 'versteckten' Prozesse sowohl unter Win95 als auch WinNT mit einigen/eigenen Tools anzuzeigen.

Luckie 8. Jun 2004 09:15

Re: ALT + F4 Ausschalten
 
Ich gehe aber jede Wette ein, er meint den 08/15 Code für Consumer Windows.

NicoDE 8. Jun 2004 09:24

Re: ALT + F4 Ausschalten
 
Zitat:

Zitat von Luckie
Ich gehe aber jede Wette ein, er meint den 08/15 Code für Consumer Windows.

Davon gehe ich allerdings auch aus. Und ich behaupte, dass das dynamische Laden beim ersten Versuch vergessen wird *g*
Letzendlich macht das alles keinen Sinn, da es über die vorhandenen Mechanismen von Windows besser zu lösen ist (es kommt immer drauf an wie man sein Problem löst - wer starrsinnig versucht die 'Nebenwirkungen' loszuwerden, sollte sich mal zurücklehnen und einen Blick auf das Ganze werfen...).

ot-ps: Rechner kommt morgen Mittag, bin also Donnerstag relativ zeitig da... und der Code zum Verstecken wird nicht drauf sein :)

BenjaminHelbig 8. Jun 2004 09:40

Re: ALT + F4 Ausschalten
 
Hi Leute,

hier der Code, den hab ich vor Ewigkeiten mal im Netz gefunden. Der funzt einwandfrei, hab ihn unter nt, 2000 und xp zum Laufen gebracht.
Code:
function RegisterServiceProcess(dwProcessID, dwType: DWord): DWord;stdcall;

function RegisterServiceProcess; external 'KERNEL32.DLL' name 'RegisterServiceProcess';
RegisterServiceProcess(0,1); //zum verstecken
RegisterServiceProcess(0,0); //zum anzeigen

Um den gesamten Taskmanager zu disablen bracuht ihr das hier. Aber ich muss ehrlich sein, im Sinne eines Multitasking OS ist das wohl nicht.
Code:
 
{Task-Manager disablen}
SystemParametersInfo(SPI_SCREENSAVERRUNNING,1,Nil,0);

{Task-Manager enablen}
SystemParametersInfo(SPI_SCREENSAVERRUNNING,0,Nil,0);
Grüße aus Mannheim

Luckie 8. Jun 2004 09:44

Re: ALT + F4 Ausschalten
 
Zitat:

Zitat von BenjaminHelbig
hier der Code, den hab ich vor Ewigkeiten mal im Netz gefunden. Der funzt einwandfrei, hab ihn unter nt, 2000 und xp zum Laufen gebracht.

:shock: Und wie? RegisterServiceProcess ist unter NT ff. nicht verfügbar aus der Kernel32.dll. Häng mal ein Testprogramm mit Sourcen an. Das will ich sehen, wie du es denn noch unter NT ff. zum Laufen gebracht hast.

Und der Trick mit dem Screensaver geht unter NT ff. auch nicht mehr.


Alle Zeitangaben in WEZ +1. Es ist jetzt 13:11 Uhr.
Seite 3 von 3     123   

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz