Verificateur de saisie

Soyez le premier à donner votre avis sur cette source.

Vue 5 805 fois - Téléchargée 502 fois

Description

Ce code permet de vérifier une saisie faite par un utilisateur.
Si celuil-la fait 3 erreurs le programme s'arrete.
Ceci n'est vraiment pas très sécurisé.
Meme si la cle-cd ne depend d'aucun algorithme vous pouvez mettre un mot de passe
ce n'est pas obligatoirement une cle-cd.
La cle-cd a utilisé est : 4GZ1BBCC-4GZ1-4GZ1-4GZ1-4GZ1BBCCM7PL

Source / Exemple :


unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    Label1: TLabel;
    Edit1: TEdit;
    Label2: TLabel;
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
    procedure FormCreate(Sender: TObject);
  private
    { Déclarations privées }
  public
    { Déclarations publiques }
  end;

var
  Form1: TForm1;
  var essai: integer;

implementation

{$R *.dfm}

procedure done();
begin
if essai = 0 then
MessageBox (0, 'Vous n''avez plus d''essais' , 'Essais épuisés', 0 + MB_ICONHAND);
Form1.close;
end;

procedure TForm1.Button1Click(Sender: TObject);

begin
if Form1.Edit1.Text = '4GZ1BBCC-4GZ1-4GZ1-4GZ1-4GZ1BBCCM7PL' then
Form1.Caption := 'Cle-cd autorisée'
else
MessageBox (0, 'ERREUR 001 : Clé-cd erronée' , 'Clé-cd', 0 + MB_ICONHAND);
essai := essai-1;

if essai = 0 then
done();
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
essai := 3;

end;

end.

Conclusion :


Si vous avez des suggestions n'hésiter pas!!

Codes Sources

A voir également

Ajouter un commentaire Commentaires
sheorogath Messages postés 2448 Date d'inscription samedi 21 février 2004 Statut Modérateur Dernière intervention 29 janvier 2010 17
21 juil. 2004 à 18:09
mais les gars je pense plutot que le crackeur verras directement le code non??
il aura un truc comme code objet "le serial" enfin tout depand du compilateur
mais je crois que ce genre de "string" ne se voit pas directement dans les tableau (enfin en c++ toutefois:j'ai tester)
pyroflo Messages postés 323 Date d'inscription lundi 24 février 2003 Statut Membre Dernière intervention 17 mai 2005
19 juil. 2004 à 01:16
Je suis du même avis, une bonne dongle et tu limites la casse...
ffert Messages postés 63 Date d'inscription samedi 18 janvier 2003 Statut Membre Dernière intervention 15 décembre 2009
19 juil. 2004 à 01:11
PS :

VIVE L'OPEN SOURCE....

et les programmes libres....

bye...
ffert Messages postés 63 Date d'inscription samedi 18 janvier 2003 Statut Membre Dernière intervention 15 décembre 2009
19 juil. 2004 à 01:10
C'est vraiment pas sécure comme méthode de verrouillage d'un EXE....

Mais bon... de toute façon tout est piratable...

pour ton verrouillage, tu prends un bon softice, on bon désassembleur... et ton applic est crackée en moins de 5 minute.... d'autant que les programmes générés avec Delphi sont trés bien documenté (désassemblé, on voit tout de façon trés explicite)...

Dés que tu affiches une fenêtre à l'écran (demandant le mot de passe par exemple), c'est crackable...

tu vois quand tu écris :
if Form1.Edit1.Text = '4GZ1BBCC-4GZ1-4GZ1-4GZ1-4GZ1BBCCM7PL' then

ceci est traduit en assembleur par quelque chose du type : Jump if Equal , il suffit de remplacer cette ligne assembleur par l'instruction Jump if Not Equal...

Et ton programme sera ouvert à tous sauf ceux qui taperons le bon code !!!

Je ne connais pas de solution miracle, je ne suis pas spécialiste dans le domaine...

Moi, ce que je dis c'est que ça sert à rien de protéger des programmes... il vaut mieux faire de l'open source (si c'est pas une application commerciale de grande envergure)... ou si l'on veut vendre, il faut que le logiciel utilise du hard et vendre le hard avec le soft (drivers ou pilote compilés dans l'exe), ça limite vraiment efficacement le piratage !!!
si le pirate à pas ton matériel il peut pas utiliser ton programme (à moins qu'il ne réécrive un driver pour son hard à lui, et là, il ferait mieux de venir bosser avec toi...)

bon. à+
japee Messages postés 1727 Date d'inscription vendredi 27 décembre 2002 Statut Modérateur Dernière intervention 6 novembre 2021 8
18 juil. 2004 à 14:26
Hé hé...
Et n'oubliez pas de coder les Strings genre "merçi de vous être enregistré" ou autres "Clé-cd autorisée"...
Un cracker moyen aura vite fait de les repérer... ;)
Sinon, autant distribuer son programme en Freeware :)
Afficher les 10 commentaires

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.