1. Accueil
  2. Tous les snippets
  3. Snippets Delphi / Pascal
  4. Protection du pc au démarrage de la session windows avec un mot de passe.

Protection du pc au démarrage de la session windows avec un mot de passe.

Soyez le premier à donner votre avis sur cette source.

Snippet vu 23 002 fois - Téléchargée 31 fois

Commenter

Contenu du snippet

Pour mon tout premier programme en Delphi je me suis inspiré de la source de Squaters64 « CODE D'ACCÉ POUR ORDINATEUR ».
Sauf que mon programme est paramétrable et il ne se fait pas contourner aussi facilement.
Ce programme en regroupe en fait deux : La protection en elle-même et la configuration de la protection !

Configuration de la protection :

- Changer le mot de passe (logique),
- Changer le nombre d?essais pour le mot de passe,
- Changer le temps du compte à rebours,
- Possibilité de lancer le programme au démarrage de Windows :
o Sur une seule session,
o Sur toutes les sessions.

Sécurité de la protection :

- Mot de passe crypté en MD5,
- Nombres d?essais pour le mot de passe,
- Compte à rebours,
- Impossibilité de lancer le Gestionnaire des tâches de Windows,
- Fermeture de l?explorer de Windows,
- Lancement au démarrage de Windows (Option, mais bon c?est préférable autrement sa ne sert a rien ;))
- Limitation du déplacement de la souris a la Form,
- Les informations sont cachées dans le registre.

Source / Exemple : 


Les sources du zip sont commentées, peut-être même un peut trop, mais bon je me suis fait plaisir ;)

http://aguanine.free.fr/Delphi/MoS Protection.zip

Conclusion :


Vous pouvez télécharger le zip sur http://aguanine.free.fr/Delphi/MoS Protection.zip car il est trop gros pour DelphiFR.com

Les programmes on été tester sous Windows XP Pro Sp1.
Créé avec Delphi 2005.
Pour le moment il ne fonctionne que sous les os utilisant « Shutdown » pour éteindre le pc.
N?hésiter pas à me faire part de bug ou amélioration à apporter.

P.s : Désoler pour l?orthographe.

Le MoS or Agu@nine

A voir également

Ajouter un commentaire

Commentaires

Signaler
Akta95380
Messages postés
1
Date d'inscription
jeudi 13 juillet 2006
Statut
Membre
Dernière intervention
13 juillet 2006
Comment fait t'on pour l'installer ??? Quand je le dézipe je vois juste un dossier remplit de fichier dois-je les déplacer ? Je suis nul ^^
Signaler
basilius
Messages postés
1
Date d'inscription
lundi 30 janvier 2006
Statut
Membre
Dernière intervention
30 janvier 2006
Comment installer ce logiciel car je ne trouve que des fihiers contenent du code, ou comment mettre ces lignes de code en logiciel?

désoler d'être un debutant mais on doit obligatoirement passer par là un jour !
Signaler
yobogs
Messages postés
9
Date d'inscription
lundi 24 mars 2003
Statut
Membre
Dernière intervention
10 juin 2007
tres bonne initiative et tres ne idée de soft. par contre tu devrais le compiler pour ceux qui ne savent pas faire ..

pour te faire avancer, je serais toi, si tu en as les compétences, pour que ton soft soit bien bien moins contournable, developpes ta propre Gina.dll et appelle un fichier sur un support type clé usb. et la tu as une protection "dure"

dispo pour infos supp par MP.

Bonne chance
Signaler
c3rb3r3
Messages postés
38
Date d'inscription
mardi 17 décembre 2002
Statut
Membre
Dernière intervention
25 janvier 2006
Protéger l'accès physique d'une machine ne se fera de toute manière pas avec un simple logiciel.

Bien sûr pour des accès limités à quelques utilisateurs de type novices, c'est sûr que ça peut être pratique.

Pour ma part, j'ai testé ton proggy sur un portable connecté sur un LAN, il suffit de tuer le processus distant ou bien réccupérer la configuration du poste vu qu'il n'y a aucun chiffrage sur la config.

Enfin bref, je te souhaite bonne chance pour la suite de ton projet qui à l'air de te tenir à coeur.
Signaler
CptPingu
Messages postés
3804
Date d'inscription
dimanche 12 décembre 2004
Statut
Modérateur
Dernière intervention
30 janvier 2020
 95
ok alros pour valider ton pass tu n'as qu'a appuyer sur entree. Pour savoir quel touche à été presser, renseigne toi sur la function GetAsyncKeyState(vKey: Integer): SHORT; stdcall;.
Par exemple dans le cas de ton programme place un timer sur ta ficher et essie ceci

procedure TForm1.Timer1Timer(Sender: TObject);
begin
if GetAsyncKeyState(VK_ENTER) then <met ici la procedure quand on clique sur ton bouton>
end;

Pour lister les programmes cours, j'avais deja fait ceci : http://0217021.free.fr/Cours/ProcessKiller.rar

voila.
Afficher les 14 commentaires
S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.