Eine Bibliothek, die Ihnen bei Hash -Passwörtern hilft. Sie können über Bcrypt in Wikipedia sowie im folgenden Artikel lesen: So speichern Sie sicher ein Passwort

Zur Leichtigkeit empfehle ich die Verwendung des Chefs (Abhängigkeitsmanager für Delphi) zur Installation, indem Sie den folgenden Befehl einfach in einem Terminal ausführen (z. B. Windows PowerShell):
boss install https://github.com/viniciussanchez/bcrypt
Wenn Sie manuell installieren möchten, fügen Sie einfach die folgenden Ordner zu Ihrem Projekt hinzu, in Projekt> Optionen> Ressourcen Compiler> Verzeichnisse und Bedingungen> Integration Dateisuchpfad integrieren
../bcrypt/src
var
LHash: string;
begin
LHash := TBCrypt.GenerateHash(password, cost, type );
end ;Wo
password ist das Passwort, das zu einem Hashed zu sein isttype ist einer von Thashtype.php, Thashtype.bsd oder Thashtype.Default, Thashtype.bsd ist der Standard cost beträgt eine Zahl zwischen 10 und 30 var
LVerify : Boolean;
begin
LVerify := TBCrypt.CompareHash(password, hash);
end ;Wo
password ist das Passwort, das überprüft werden sollhash ist ein erzeugter Hash, ähnlich $2y$12$GuC.Gk2YDsp8Yvga.IuSNOWM0fxEIsAEaWC1hqEI14Wa.7Ps3iYFq var
LHashInfo: THashInfo;
LSalt, LHash: string;
LHashType: THashType;
LCost: Word;
begin
LHashInfo := TBCrypt.GetHashInfo(hash);
LCost := LHashInfo.Cost;
LSalt := LHashInfo.Salt;
LHash := LHashInfo.Hash;
LHashType := LHashInfo.& Type ;Wo
hash ist ein Hash, der erzeugt hat var
LNeeds : Boolean;
begin
LNeeds := TBCrypt.NeedsRehash(hash, cost);
end ;Wo
hash ist ein Hash, ähnlich $2y$12$GuC.Gk2YDsp8Yvga.IuSNOWM0fxEIsAEaWC1hqEI14Wa.7Ps3iYFqcost beträgt eine Zahl zwischen 10 und 30Die Charaktere, aus denen sich der resultierende Hash umfasst, sind:
./ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789
Die resultierenden Hashes werden 60 Zeichen lang sein.

Der Code dafür stammt aus einigen Quellen: