Delphi-PRAXiS
Seite 3 von 4     123 4      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Tastatur Sperren, Maus nich? (https://www.delphipraxis.net/62087-tastatur-sperren-maus-nich.html)

Luckie 31. Jan 2006 00:29

Re: Tastatur Sperren, Maus nich?
 
Laßt uns bitte diese Diskussion auf einer sachlichen Ebene führen.

FlinkerFinger 31. Jan 2006 06:25

Re: Tastatur Sperren, Maus nich?
 
Zitat:

Zitat von Daniel G
Und wenn du es trotz allem zu erwartenden Misserfolg probieren willst, dann nutze einfach den Link von 3_of_8.

Das werde ich auch machen... bzw. so ein bisschen habe ich da schon reingeschaut... scheint nicht so sehr schwer zu sein wie ich es in Errinerung hatte...

perle 31. Jan 2006 07:07

Re: Tastatur Sperren, Maus nich?
 
Zitat:

Zitat von CG2003
Zitat:

Zitat von Luckie
Es geht einfach nicht. Punkt.

Ich kann nur soviel dazu sagen, das ich es mal sage und schreibe eine Woche lang probiert habe, das Windows-Sicherheitssystem was diese Tatenkombination angeht, zu umgehen. Das einzige was ich erreicht habe ist, das ich um eine Erfahrung sowie die Tatsache, das es definitiv nicht möglich ist (ausser die GINA.dll zu ersetzen bzw. einen Tastaturtreiber zu programmieren) reicher bin.

Desweiteren sollte man auch darauf achten, welchen Umgangston man hier verwendet.



Zitat:

Zitat von Assarbad
Was du machen mußt, ist die:
WlxLoggedOnSAS() zu hooken und auf WLX_SAS_TYPE_CTRL_ALT_DEL zu testen. Damit kannst du selbst die Weiterleitung zur gleichnamigen Funktion der ursprünglichen GINA verhindern.


Daniel G 31. Jan 2006 10:54

Re: Tastatur Sperren, Maus nich?
 
Zitat:

Zitat von perle
Zitat:

Zitat von Assarbad
Was du machen mußt, ist die:
WlxLoggedOnSAS() zu hooken und auf WLX_SAS_TYPE_CTRL_ALT_DEL zu testen. Damit kannst du selbst die Weiterleitung zur gleichnamigen Funktion der ursprünglichen GINA verhindern.


Blubb? Ich dachte, unter NT geht das nicht mehr. Dann ist an der Geschichte mit dem Mond ja doch was Wahres dran...

@Luckie:
'tschuldigung, aber es brannte mir so unter den Nägeln. :zwinker:

@Threadersteller:
höhö... Unter Windows XP funktioniert das auch einfach mit einem Eintrag in der Registry. Allerdings ist es dann auch nicht mehr möglich, Programm zu beenden, die abgeraucht sind. Insofern wohl nicht das Wahre...

Link:
http://msdn.microsoft.com/msdnmag/is...A/default.aspx

Geht es dir eigentlich nur noch um Strg+Alt+Entf?

perle 31. Jan 2006 11:02

Re: Tastatur Sperren, Maus nich?
 
Zitat:

Zitat von Daniel G
Blubb? Ich dachte, unter NT geht das nicht mehr. Dann ist an der Geschichte mit dem Mond ja doch was Wahres dran...

Geht, habs grad ausprobiert. Ist zwar noch etwas unschön, da beim drücken von ctrl+alt+del noch ein kleines Flackern zu sehen ist....aber es geht.....für bessere Änderungen müsste man wohl die Gina austauschen und im WlxNegotiate und durch WlxSetOption
WLX_OPTION_USE_CTRL_ALT_DEL auf False (0) setzen, dann würde auch das Flackern nichtmehr angezeigt.

FlinkerFinger 31. Jan 2006 11:41

Re: Tastatur Sperren, Maus nich?
 
na goil... es geht... hmmm aber was genau muss ich da jetzt machen ?

@ Perle kannste nicht mal den code irgendwie zugänglich machen ?

perle 31. Jan 2006 13:30

Re: Tastatur Sperren, Maus nich?
 
Ehrlich gesagt bin ich mir nicht sicher, ob ich das tun soll. Du sagst, du willst das aus Lernzwecken machen, aber dir einfach Code geben zu lassen und ihn zu kompilieren ist nichts, wobei man etwas lernt.

Beschäftige dich einfach ein wenig mit API-Hooking/DLL-Injecting, das ist schonmal kompliziert genug.

Danach musst du im Prinzip nur vor aufruf der o.g. Funktion abfragen, ob ctrl+alt+entf gedrückt wurde und einen entsprechenden Rückgabewert zurückliefern.

Code:
const
  WLX_SAS_TYPE_CTRL_ALT_DEL = 1;
  WLX_SAS_ACTION_NONE = 2;

var
  OldWlxLoggedOnSAS : function(pWlxContext : Pointer;dwSasType : DWORD;pReserved : Pointer) : Integer; stdCall;

function NewWlxLoggedOnSAS(pWlxContext : Pointer;dwSasType : DWORD;pReserved : Pointer) : Integer; stdCall;
begin
  if dwSasType = WLX_SAS_TYPE_CTRL_ALT_DEL then
    result := WLX_SAS_ACTION_NONE
  else
    result := OldWlxLoggedOnSAS(pWlxContext,dwSasType,pReserved);
end;

FlinkerFinger 31. Jan 2006 22:16

Re: Tastatur Sperren, Maus nich?
 
Natürlich lernt man dabei etwas ;) Und nicht nur wie man kopiert und einfügt, sondern auch wie dann der Code den man bekommen hat funktioniert... natürlich gilt das nur , wenn man es auch versucht heraus zu bekommen!

Zitat:

Zitat von perle
Beschäftige dich einfach ein wenig mit API-Hooking/DLL-Injecting, das ist schonmal kompliziert genug.

Ja das habe ich gemerkt, habe mir nen paar Tuts über Hooks angesehen und war doch sehr erstaunt was man da schon alles wissen muss. :coder2:
Habe leider auch im moment nicht zu viel Zeit da ich eine Präsentation vorbereiten muss :kotz: Aber danach werde ich deinen Code analysieren und was ich sonst noch brauche studieren.


P.S. Ich wollte nochmal ein danke schön an die gesammte Runde werfen ! :balloon:

F.W. 26. Apr 2006 14:16

Re: Tastatur Sperren, Maus nich?
 
Ich weiß dass es jetzt schon länger her ist, aber da ich gerade durch die Suche über diesen Thread gestolpert bin, geb ich mal schnell meinen Senf dazu:

Es gibt in der Registry einen Schlüssel, da kann man den TaskManager (also auch STRG+ALT+ENTF ) sperren!

HKEY_CURRENT_USER\Software\Microsoft\Windows\Curre ntVersion\Policies\System

Und dort einen DWORD Wert erstellen:

DisableTaskMgr

Wenn 1 dann ist das Ding gesperrt, wenn 0 gehts!

Für die Nachwelt ;)

faux 25. Jul 2006 16:45

Re: Tastatur Sperren, Maus nich?
 
Zitat:

Zitat von F.W.
Ich weiß dass es jetzt schon länger her ist, aber da ich gerade durch die Suche über diesen Thread gestolpert bin, geb ich mal schnell meinen Senf dazu:
Es gibt in der Registry einen Schlüssel, da kann man den TaskManager (also auch STRG+ALT+ENTF ) sperren!
HKEY_CURRENT_USER\Software\Microsoft\Windows\Curre ntVersion\Policies\System
Und dort einen DWORD Wert erstellen:
DisableTaskMgr
Wenn 1 dann ist das Ding gesperrt, wenn 0 gehts!
Für die Nachwelt ;)

Es ging ja nicht darum, den Taskmanager zu sperren, sondern die Tasteknombination Strg+Alt+Entf. ;)

Grüße
Faix


Alle Zeitangaben in WEZ +1. Es ist jetzt 08:50 Uhr.
Seite 3 von 4     123 4      

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