| Autor |
Beitrag |
patrick dee
      
Beiträge: 311
Win 98SE, WinXP
D3,D6
|
Verfasst: Sa 21.05.05 10:18
Hi
kann mir jemand weiterhelfen eine passwort Abfrage mit Delphi zu basteln ? In der Software sollte ein Wort definiert sein, das als passwort gilt. Sollte dreimal das falsche eingegeben werden, soll der Rechner runterfahren.
etwas Code wäre nicht schelcht. Auch sollte man nicht mit der ESC Taste die Abfrage umgehen können .
Danke und ein schönes Weekend.
Patrick
_________________ Glauben heißt nichts wissen ...
|
|
koller1
      
Beiträge: 216
WIN XP
D7 Ent
|
Verfasst: Sa 21.05.05 10:22
hi!
Wie wärs, wenn du das Passwort in einer Ini-Datei festhältst! Natürlich verschlüsselt, nach irgendeinem Algorithmus! Und wenn dreimal das Abgleichen von Edit (Eingabefeld) und dem Eintrag in der Ini-Datei nicht geklappt hat, dann baust du die Windows-Shutdown-Funktion ein, die den PC runterfahren lässt!
MFG
koller1
|
|
blaueled
      
Beiträge: 133
Win XP
D5
|
Verfasst: Mo 30.05.05 17:19
Hi
du solltest deine form mit canclose := false schützen
Delphi-Quelltext 1: 2: 3: 4:
| procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean); begin canclose := false; end; |
anstatt des false würde ich eine Variable nehmen. Man kann das ganze mit dem Taskmanager umgehen, aber dann ist ja auch das gesamte Programm weg.
Arne
Moderiert von Tino: Code- durch Delphi-Tags ersetzt.
|
|
MrFox
      
Beiträge: 208
WIN 2000 Professional, Ubuntu 5.10
D3 Prof, D7 Pers, D2005 Pers, Java (Eclipse)
|
Verfasst: Mo 30.05.05 18:03
blaueled hat folgendes geschrieben: | Hi
du solltest deine form mit canclose := false schützen
|
Ich würd viel eher eine Boolean-Variable in das Programm einbauen, die erst dann "true" wird, wenn das Passwort korrekt eingegeben wurde. Im OnClose des Forms wird der PC heruntergefahren wenn die Variable nicht "true" ist.
_________________ Das Leben auf der Erde mag zwar teuer sein, aber eine jährliche Rundreise um die Sonne ist gratis mit dabei.
|
|
3rdnuss
      
Beiträge: 139
|
Verfasst: Mo 30.05.05 18:21
Den Taskmanager kann man auch ganz einfach ausschalten.
Allerings ist der dann global gesperrt.
Du könntest also mit einem Timer im Sekundentakt überprüfen, ob es ein Programm gibt was zufälligerweise "Windows Task-Manager" heißt..
Delphi-Quelltext 1:
| CloseWindow(Findwindow(nil,'Windows Task-Manager')) |
|
|
Malo05
      
Beiträge: 34
Windows XP Professional SP2
D5 Prof (SSL), D7 Pers, D2005 Pers
|
Verfasst: Mo 30.05.05 18:59
3rdnuss hat folgendes geschrieben: | Den Taskmanager kann man auch ganz einfach ausschalten.
Allerings ist der dann global gesperrt.
Du könntest also mit einem Timer im Sekundentakt überprüfen, ob es ein Programm gibt was zufälligerweise "Windows Task-Manager" heißt..
Delphi-Quelltext 1:
| CloseWindow(Findwindow(nil,'Windows Task-Manager')) | |
Man könnte auch den Taskmanager via Registry-Eintrag deaktivieren. Das ist jedoch nicht der Sinn des Taskmanagers
Einfach mal danach suchen. TASKMANAGER DEAKTIVIEREN
//edit: Ich sehe grad, der Link bringt keine Suchergebnisse. Versucht mal TASKMANAGER DEAKTIVIEREN
//edit2: Zum Taskmanager deaktivieren hier schauen 
Zuletzt bearbeitet von Malo05 am Mo 30.05.05 19:04, insgesamt 1-mal bearbeitet
|
|
3rdnuss
      
Beiträge: 139
|
Verfasst: Mo 30.05.05 19:03
Also von der Registry würd ich die Finger von lassen.. Nach funktioniert da garnichts mehr.
Also Verschlüsselungsalgorithmen wirst du genug finden.. und den Taskmanager s.o
|
|
Malo05
      
Beiträge: 34
Windows XP Professional SP2
D5 Prof (SSL), D7 Pers, D2005 Pers
|
Verfasst: Mo 30.05.05 19:06
3rdnuss hat folgendes geschrieben: | | Also von der Registry würd ich die Finger von lassen.. Nach funktioniert da garnichts mehr. |
Wenn man es richtig macht und nicht willkürlich irgendwelche Schlüssel entfernt, gibt es da keine Probleme. Man sollte halt nur wissen, was man macht 
|
|
D. Annies
      
Beiträge: 1843
windows 7
D6 Enterprise, D7 Pers und TD 2006
|
Verfasst: Mo 30.05.05 21:05
Hi,
ich bin folgendermaßen vorgegangen:
eine Proc, die einen Edit-Eintrag mit einem im Code (den muss man ja nicht mitliefern..) gespeicherten Passwort vergleicht, wird am PrgAnfang und nach einer einstellbaren Zeit der Inaktivität tätig.
Ich glaube, das reicht für die normalen USER-Fährnisse, oder?
Grüße von
Detlef Annies aus HL
|
|
Nightshade
Hält's aus hier
Beiträge: 4
Win 98 und Win XP
D5 Prof
|
Verfasst: Do 02.06.05 10:11
Gut, Taskmanager ist deaktiviert und das Programm fährt den Pc herunter...
Aber wie umgeht man, dass das Programm mittels "Alt + F4" geschlossen wird?
|
|
Luckie
Ehemaliges Mitglied
Erhaltene Danke: 1
|
Verfasst: Do 02.06.05 10:16
| Zitat: | | Aber wie umgeht man, dass das Programm mittels "Alt + F4" geschlossen wird? |
Forensuche.
Was soll das eigentlich werden, wenn es fertig ist?
Schön, dass du den Taskamanger deaktiviert hat. Da kommt Freude auf, wenn ein Programm nicht mehr reagiert und man es nicht beenden kann und man den PC ausschalten muss, weil das Programm das ganze Windows blockiert. Vile Spass mit der Mail von demjenigen, der deswegen sein letztes Kapitel seiner Doktorarbeit noch mal schreiben drufte. Und hast du auch an die tausend anderen Prozess-Explorer gedacht? Oder gar an kill aus dem Windows Resourcekit?
|
|
deccer
      
Beiträge: 57
|
Verfasst: Do 02.06.05 10:21
in dem man beispielsweise das ereignis
TForm.OnCloseQuery bearbeitet und dementsprechend CanClose setzt...
|
|
Tino
      

Beiträge: 9839
Erhaltene Danke: 45
Windows 8.1
Delphi XE4
|
Verfasst: Do 02.06.05 10:24
Malo05 hat folgendes geschrieben: | | //edit: Ich sehe grad, der Link bringt keine Suchergebnisse. |
Man sollte die Suchbegriffe auch richtig schreiben.  Ich habe Deinen Beitrag bzw die Suchbegriffe mal korrigiert.
|
|