Verschlüsselung eines Strings

[w-lan]

Hallo,
ich möchte einen String verschlüsseln.
Wie kann ich dies in Delphi realisieren?

Vielen Dank im Voraus für Eure Hilfe!

Gruß

w-lan

[mgubler]

Probiers mal mit dem DEC von Hagen Redmann.
Suche mal nach DEC.
Ich meine Lucky hat das auf seiner Seite

DEC-Download [Luckies Page]

[mkinzler]

Verschlüsselung ist theroetisch in jeder Sprache möglich, wenn du es selber programmierst. Eine gute Library für Verschlüsselung is LockBox von TurboPower (nun OS).

[XHelp]

Es kommt drauf an, wie sicher die verschlüsselung sein muss... wenn es einfach nur so ist, dann kannst du auch eine xor methode nehmen:

Delphi-Quellcode:

function crypt(s:string):string;
var
i:integer;
begin
Result:='';
for i:=1 to Length(s) do Result:=Result+char(ord(s[i]) xor 2);
end;

Mit der function kannst du ein text ver- oder entschlüsseln... die Zahl 2 kannst du beliebig ändern, aber bei der entschlüsselung muss logische weise der gleiche parameter verwendet werden.

[Luckie]

Zum Thema Verschlüsselung findest du im Forum mit der Suche mehr als genug.