am einfachsten und auch sehr sicher ... schau dich hier mal nach Hagens
DEC um (auf Luckies Seite liegt es auch noch zum Download rum)
PS: selbst die billige XOR-Verschlüsselung kann sehr sicher (sogar fast 100%ig Unknackbar sein) ... man muß nur einen Schlüssel haben, welcher mindestens genausogroß ist, wie die zu verschlüsselnden Daten selber
Ansonsten gibt es auch schon massig Threads hier zu diesem Thema.
Ja und wenn etwas 100% sicher wäre, dann könnte man es auch nie wieder entschlüsseln, da ja zumindestens für diesen Fall eine "Hintertür" vorhanden sein muß
PS: du kannst da einen Schritt [Einlesen des Passwortes] bei dir auch rauslassen
Delphi-Quellcode:
// Einlesen des Passwortes
s := edit1.text;
...
pwp := 1;
...
m.read(by, sizeof(by));
by := by Xor ord(pw[pwp]);
m2.write(by, sizeof(by));
pwp := pwp Mod length(pw) + 1;
...
// Ausgabe des Verwendeten Passwortes
label1.caption := 'Benutztes Passwort [ Länge : ' + inttostr(length(s)) + ' ]';
edit3.text := s;
und wozu der MemoryStream?
nimm doch zum Auslesen/Schreiben direkt den FileStream
oder waumm der FileStream ... LoadFormFile und Co. sollte sollen die MemoryStreams auch drinnen haben
da es hier ja wohl nicht sooooo um Geschwindigkeit geht
sonst hätte sogar ein MemoryStream gereicht