- Delphi / Pascal : Cryptage et décryptage de chaine - CodeS SourceS
- Cryptage et decryptage de repertoire
- Cryptage et decryptage de repertoire en c# avec visual studio
- Delphi / Pascal : Cryptage et decryptage par la methode de vigenere ;didactique - CodeS SourceS
- Cryptage et décryptage à l'aide d'une clef
Algorithme pour le cryptage et decryptage
Résolu
Signaler
korichitarek
korichitarek
- Messages postés
- 37
- Date d'inscription
- mercredi 17 mai 2006
- Statut
- Membre
- Dernière intervention
- 14 novembre 2016
korichitarek
- Messages postés
- 37
- Date d'inscription
- mercredi 17 mai 2006
- Statut
- Membre
- Dernière intervention
- 14 novembre 2016
A voir également:
- Cryptage et décryptage
- Visual Basic / VB.NET : Cryptage et décryptage simple de string - CodeS SourceS - Guide
- Cryptage et décryptage de messages - Codes sources - Visual Basic / VB.NET (Sécurité)
- Cryptage et decryptage de fichier v1.1 - Codes sources - Visual Basic / VB.NET (Sécurité)
- Cryptage et decryptage - Codes sources - Visual Basic / VB.NET (Sécurité)
- Delphi / Pascal : Cryptage et décryptage d'une chaine - CodeS SourceS - Guide
5 réponses
korichitarek
- Messages postés
- 37
- Date d'inscription
- mercredi 17 mai 2006
- Statut
- Membre
- Dernière intervention
- 14 novembre 2016
merci tout le monde
j'ai change la philosophie
j'ai opté pour une solution
j'ai change la philosophie
j'ai opté pour une solution
cs_cantador
- Messages postés
- 4720
- Date d'inscription
- dimanche 26 février 2006
- Statut
- Modérateur
- Dernière intervention
- 31 juillet 2021
Bonjour,
Il faut d'abord apprendre à chercher de l'information..
Ce problème a été posé et résolu à de nombreuses reprises.
Tu trouveras sur ce site même, des exemples de cryptage et de décryptage
(vigenere etc..) d'une information.
cantador
Il faut d'abord apprendre à chercher de l'information..
Ce problème a été posé et résolu à de nombreuses reprises.
Tu trouveras sur ce site même, des exemples de cryptage et de décryptage
(vigenere etc..) d'une information.
cantador
aliilyas
- Messages postés
- 32
- Date d'inscription
- lundi 29 juin 2009
- Statut
- Membre
- Dernière intervention
- 5 février 2014
bonjour.
function Encrypt(const s: String; CryptInt: Integer): String;
var
i: integer;
s2: string;
begin
if not (Length(s) = 0) then
for i := 1 to Length(s) do
s2 := s2 + Chr(Ord(s[i]) + CrypTint);
Result := s2;
end;
function Decrypt(const s: String; CryptInt: Integer): String;
var
i: integer;
s2: string;
begin
if not (Length(s) = 0) then
for i := 1 to Length(s) do
s2 := s2 + Chr(Ord(s[i]) - cryptint);
Result := s2;
end;
function Encrypt(const s: String; CryptInt: Integer): String;
var
i: integer;
s2: string;
begin
if not (Length(s) = 0) then
for i := 1 to Length(s) do
s2 := s2 + Chr(Ord(s[i]) + CrypTint);
Result := s2;
end;
function Decrypt(const s: String; CryptInt: Integer): String;
var
i: integer;
s2: string;
begin
if not (Length(s) = 0) then
for i := 1 to Length(s) do
s2 := s2 + Chr(Ord(s[i]) - cryptint);
Result := s2;
end;
aliilyas
- Messages postés
- 32
- Date d'inscription
- lundi 29 juin 2009
- Statut
- Membre
- Dernière intervention
- 5 février 2014
edit1.Text:=Encrypt('korichi',5);
moi aussi mon nom korichi .
moi aussi mon nom korichi .
korichitarek
- Messages postés
- 37
- Date d'inscription
- mercredi 17 mai 2006
- Statut
- Membre
- Dernière intervention
- 14 novembre 2016
ce que je cherche c'est crypte une chaine en code lisible (lettre/chiffre) .
je vais essaye la solution aliilyas
je vais essaye la solution aliilyas